patch 8.2.1114: terminal test sometimes times out
Problem: Terminal test sometimes times out.
Solution: Split the test in two parts.
diff --git a/src/testdir/Make_all.mak b/src/testdir/Make_all.mak
index fff4fdf..a0884cd 100644
--- a/src/testdir/Make_all.mak
+++ b/src/testdir/Make_all.mak
@@ -276,6 +276,7 @@
test_termcodes \
test_termencoding \
test_terminal \
+ test_terminal2 \
test_terminal_fail \
test_textformat \
test_textobjects \
@@ -492,6 +493,7 @@
test_termcodes.res \
test_termencoding.res \
test_terminal.res \
+ test_terminal2.res \
test_terminal_fail.res \
test_textformat.res \
test_textobjects.res \
diff --git a/src/testdir/Makefile b/src/testdir/Makefile
index 29efa0f..7f9ef04 100644
--- a/src/testdir/Makefile
+++ b/src/testdir/Makefile
@@ -168,14 +168,6 @@
$(RUN_VIMTEST) $(NO_INITS) -S runtest.vim $*.vim $(REDIR_TEST_TO_NULL)
@rm vimcmd
-# Temporary: Do not use $REDIR_TEST_TO_NULL for test_terminal to be able to see
-# where it sometimes hanges on CI.
-test_terminal.res: test_terminal.vim
- @echo "$(VIMPROG)" > vimcmd
- @echo "$(RUN_VIMTEST)" >> vimcmd
- $(RUN_VIMTEST) $(NO_INITS) -S runtest.vim $*.vim
- @rm vimcmd
-
test_gui.res: test_gui.vim
@echo "$(VIMPROG)" > vimcmd
@echo "$(RUN_GVIMTEST)" >> vimcmd
diff --git a/src/testdir/term_util.vim b/src/testdir/term_util.vim
index 7a73adb..17f9752 100644
--- a/src/testdir/term_util.vim
+++ b/src/testdir/term_util.vim
@@ -146,4 +146,28 @@
only!
endfunc
+" Open a terminal with a shell, assign the job to g:job and return the buffer
+" number.
+func Run_shell_in_terminal(options)
+ if has('win32')
+ let buf = term_start([&shell,'/k'], a:options)
+ else
+ let buf = term_start(&shell, a:options)
+ endif
+ let g:test_is_flaky = 1
+
+ let termlist = term_list()
+ call assert_equal(1, len(termlist))
+ call assert_equal(buf, termlist[0])
+
+ let g:job = term_getjob(buf)
+ call assert_equal(v:t_job, type(g:job))
+
+ let string = string({'job': buf->term_getjob()})
+ call assert_match("{'job': 'process \\d\\+ run'}", string)
+
+ return buf
+endfunc
+
+
" vim: shiftwidth=2 sts=2 expandtab
diff --git a/src/testdir/test_terminal.vim b/src/testdir/test_terminal.vim
index bbc6b90..4069848 100644
--- a/src/testdir/test_terminal.vim
+++ b/src/testdir/test_terminal.vim
@@ -1,4 +1,6 @@
" Tests for the terminal window.
+" This is split in two, because it can take a lot of time.
+" See test_terminal2.vim for further tests.
source check.vim
CheckFeature terminal
@@ -6,33 +8,11 @@
source shared.vim
source screendump.vim
source mouse.vim
+source term_util.vim
let s:python = PythonProg()
let $PROMPT_COMMAND=''
-" Open a terminal with a shell, assign the job to g:job and return the buffer
-" number.
-func Run_shell_in_terminal(options)
- if has('win32')
- let buf = term_start([&shell,'/k'], a:options)
- else
- let buf = term_start(&shell, a:options)
- endif
- let g:test_is_flaky = 1
-
- let termlist = term_list()
- call assert_equal(1, len(termlist))
- call assert_equal(buf, termlist[0])
-
- let g:job = term_getjob(buf)
- call assert_equal(v:t_job, type(g:job))
-
- let string = string({'job': buf->term_getjob()})
- call assert_match("{'job': 'process \\d\\+ run'}", string)
-
- return buf
-endfunc
-
func Test_terminal_basic()
au TerminalOpen * let b:done = 'yes'
let buf = Run_shell_in_terminal({})
@@ -1355,924 +1335,6 @@
set laststatus&
endfunc
-func Api_drop_common(options)
- call assert_equal(1, winnr('$'))
-
- " Use the title termcap entries to output the escape sequence.
- call writefile([
- \ 'set title',
- \ 'exe "set t_ts=\<Esc>]51; t_fs=\x07"',
- \ 'let &titlestring = ''["drop","Xtextfile"' . a:options . ']''',
- \ 'redraw',
- \ "set t_ts=",
- \ ], 'Xscript')
- let buf = RunVimInTerminal('-S Xscript', {})
- call WaitFor({-> bufnr('Xtextfile') > 0})
- call assert_equal('Xtextfile', expand('%:t'))
- call assert_true(winnr('$') >= 3)
- return buf
-endfunc
-
-func Test_terminal_api_drop_newwin()
- CheckRunVimInTerminal
- let buf = Api_drop_common('')
- call assert_equal(0, &bin)
- call assert_equal('', &fenc)
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- bwipe Xtextfile
-endfunc
-
-func Test_terminal_api_drop_newwin_bin()
- CheckRunVimInTerminal
- let buf = Api_drop_common(',{"bin":1}')
- call assert_equal(1, &bin)
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- bwipe Xtextfile
-endfunc
-
-func Test_terminal_api_drop_newwin_binary()
- CheckRunVimInTerminal
- let buf = Api_drop_common(',{"binary":1}')
- call assert_equal(1, &bin)
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- bwipe Xtextfile
-endfunc
-
-func Test_terminal_api_drop_newwin_nobin()
- CheckRunVimInTerminal
- set binary
- let buf = Api_drop_common(',{"nobin":1}')
- call assert_equal(0, &bin)
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- bwipe Xtextfile
- set nobinary
-endfunc
-
-func Test_terminal_api_drop_newwin_nobinary()
- CheckRunVimInTerminal
- set binary
- let buf = Api_drop_common(',{"nobinary":1}')
- call assert_equal(0, &bin)
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- bwipe Xtextfile
- set nobinary
-endfunc
-
-func Test_terminal_api_drop_newwin_ff()
- CheckRunVimInTerminal
- let buf = Api_drop_common(',{"ff":"dos"}')
- call assert_equal("dos", &ff)
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- bwipe Xtextfile
-endfunc
-
-func Test_terminal_api_drop_newwin_fileformat()
- CheckRunVimInTerminal
- let buf = Api_drop_common(',{"fileformat":"dos"}')
- call assert_equal("dos", &ff)
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- bwipe Xtextfile
-endfunc
-
-func Test_terminal_api_drop_newwin_enc()
- CheckRunVimInTerminal
- let buf = Api_drop_common(',{"enc":"utf-16"}')
- call assert_equal("utf-16", &fenc)
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- bwipe Xtextfile
-endfunc
-
-func Test_terminal_api_drop_newwin_encoding()
- CheckRunVimInTerminal
- let buf = Api_drop_common(',{"encoding":"utf-16"}')
- call assert_equal("utf-16", &fenc)
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- bwipe Xtextfile
-endfunc
-
-func Test_terminal_api_drop_oldwin()
- CheckRunVimInTerminal
- let firstwinid = win_getid()
- split Xtextfile
- let textfile_winid = win_getid()
- call assert_equal(2, winnr('$'))
- call win_gotoid(firstwinid)
-
- " Use the title termcap entries to output the escape sequence.
- call writefile([
- \ 'set title',
- \ 'exe "set t_ts=\<Esc>]51; t_fs=\x07"',
- \ 'let &titlestring = ''["drop","Xtextfile"]''',
- \ 'redraw',
- \ "set t_ts=",
- \ ], 'Xscript')
- let buf = RunVimInTerminal('-S Xscript', {'rows': 10})
- call WaitForAssert({-> assert_equal('Xtextfile', expand('%:t'))})
- call assert_equal(textfile_winid, win_getid())
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- bwipe Xtextfile
-endfunc
-
-func Tapi_TryThis(bufnum, arg)
- let g:called_bufnum = a:bufnum
- let g:called_arg = a:arg
-endfunc
-
-func WriteApiCall(funcname)
- " Use the title termcap entries to output the escape sequence.
- call writefile([
- \ 'set title',
- \ 'exe "set t_ts=\<Esc>]51; t_fs=\x07"',
- \ 'let &titlestring = ''["call","' . a:funcname . '",["hello",123]]''',
- \ 'redraw',
- \ "set t_ts=",
- \ ], 'Xscript')
-endfunc
-
-func Test_terminal_api_call()
- CheckRunVimInTerminal
-
- unlet! g:called_bufnum
- unlet! g:called_arg
-
- call WriteApiCall('Tapi_TryThis')
-
- " Default
- let buf = RunVimInTerminal('-S Xscript', {})
- call WaitFor({-> exists('g:called_bufnum')})
- call assert_equal(buf, g:called_bufnum)
- call assert_equal(['hello', 123], g:called_arg)
- call StopVimInTerminal(buf)
-
- unlet! g:called_bufnum
- unlet! g:called_arg
-
- " Enable explicitly
- let buf = RunVimInTerminal('-S Xscript', {'term_api': 'Tapi_Try'})
- call WaitFor({-> exists('g:called_bufnum')})
- call assert_equal(buf, g:called_bufnum)
- call assert_equal(['hello', 123], g:called_arg)
- call StopVimInTerminal(buf)
-
- unlet! g:called_bufnum
- unlet! g:called_arg
-
- func! ApiCall_TryThis(bufnum, arg)
- let g:called_bufnum2 = a:bufnum
- let g:called_arg2 = a:arg
- endfunc
-
- call WriteApiCall('ApiCall_TryThis')
-
- " Use prefix match
- let buf = RunVimInTerminal('-S Xscript', {'term_api': 'ApiCall_'})
- call WaitFor({-> exists('g:called_bufnum2')})
- call assert_equal(buf, g:called_bufnum2)
- call assert_equal(['hello', 123], g:called_arg2)
- call StopVimInTerminal(buf)
-
- call assert_fails("call term_start('ls', {'term_api' : []})", 'E475:')
-
- unlet! g:called_bufnum2
- unlet! g:called_arg2
-
- call delete('Xscript')
- delfunction! ApiCall_TryThis
- unlet! g:called_bufnum2
- unlet! g:called_arg2
-endfunc
-
-func Test_terminal_api_call_fails()
- CheckRunVimInTerminal
-
- func! TryThis(bufnum, arg)
- let g:called_bufnum3 = a:bufnum
- let g:called_arg3 = a:arg
- endfunc
-
- call WriteApiCall('TryThis')
-
- unlet! g:called_bufnum3
- unlet! g:called_arg3
-
- " Not permitted
- call ch_logfile('Xlog', 'w')
- let buf = RunVimInTerminal('-S Xscript', {'term_api': ''})
- call WaitForAssert({-> assert_match('Unpermitted function: TryThis', string(readfile('Xlog')))})
- call assert_false(exists('g:called_bufnum3'))
- call assert_false(exists('g:called_arg3'))
- call StopVimInTerminal(buf)
-
- " No match
- call ch_logfile('Xlog', 'w')
- let buf = RunVimInTerminal('-S Xscript', {'term_api': 'TryThat'})
- call WaitFor({-> string(readfile('Xlog')) =~ 'Unpermitted function: TryThis'})
- call assert_false(exists('g:called_bufnum3'))
- call assert_false(exists('g:called_arg3'))
- call StopVimInTerminal(buf)
-
- call delete('Xscript')
- call ch_logfile('')
- call delete('Xlog')
- delfunction! TryThis
- unlet! g:called_bufnum3
- unlet! g:called_arg3
-endfunc
-
-let s:caught_e937 = 0
-
-func Tapi_Delete(bufnum, arg)
- try
- execute 'bdelete!' a:bufnum
- catch /E937:/
- let s:caught_e937 = 1
- endtry
-endfunc
-
-func Test_terminal_api_call_fail_delete()
- CheckRunVimInTerminal
-
- call WriteApiCall('Tapi_Delete')
- let buf = RunVimInTerminal('-S Xscript', {})
- call WaitForAssert({-> assert_equal(1, s:caught_e937)})
-
- call StopVimInTerminal(buf)
- call delete('Xscript')
- call ch_logfile('', '')
-endfunc
-
-func Test_terminal_ansicolors_default()
- CheckFunction term_getansicolors
-
- let colors = [
- \ '#000000', '#e00000',
- \ '#00e000', '#e0e000',
- \ '#0000e0', '#e000e0',
- \ '#00e0e0', '#e0e0e0',
- \ '#808080', '#ff4040',
- \ '#40ff40', '#ffff40',
- \ '#4040ff', '#ff40ff',
- \ '#40ffff', '#ffffff',
- \]
-
- let buf = Run_shell_in_terminal({})
- call assert_equal(colors, term_getansicolors(buf))
- call StopShellInTerminal(buf)
- call TermWait(buf)
- call assert_equal([], term_getansicolors(buf))
-
- exe buf . 'bwipe'
-endfunc
-
-let s:test_colors = [
- \ '#616e64', '#0d0a79',
- \ '#6d610d', '#0a7373',
- \ '#690d0a', '#6d696e',
- \ '#0d0a6f', '#616e0d',
- \ '#0a6479', '#6d0d0a',
- \ '#617373', '#0d0a69',
- \ '#6d690d', '#0a6e6f',
- \ '#610d0a', '#6e6479',
- \]
-
-func Test_terminal_ansicolors_global()
- CheckFeature termguicolors
- CheckFunction term_getansicolors
-
- let g:terminal_ansi_colors = reverse(copy(s:test_colors))
- let buf = Run_shell_in_terminal({})
- call assert_equal(g:terminal_ansi_colors, term_getansicolors(buf))
- call StopShellInTerminal(buf)
- call TermWait(buf)
-
- exe buf . 'bwipe'
- unlet g:terminal_ansi_colors
-endfunc
-
-func Test_terminal_ansicolors_func()
- CheckFeature termguicolors
- CheckFunction term_getansicolors
-
- let g:terminal_ansi_colors = reverse(copy(s:test_colors))
- let buf = Run_shell_in_terminal({'ansi_colors': s:test_colors})
- call assert_equal(s:test_colors, term_getansicolors(buf))
-
- call term_setansicolors(buf, g:terminal_ansi_colors)
- call assert_equal(g:terminal_ansi_colors, buf->term_getansicolors())
-
- let colors = [
- \ 'ivory', 'AliceBlue',
- \ 'grey67', 'dark goldenrod',
- \ 'SteelBlue3', 'PaleVioletRed4',
- \ 'MediumPurple2', 'yellow2',
- \ 'RosyBrown3', 'OrangeRed2',
- \ 'white smoke', 'navy blue',
- \ 'grey47', 'gray97',
- \ 'MistyRose2', 'DodgerBlue4',
- \]
- eval buf->term_setansicolors(colors)
-
- let colors[4] = 'Invalid'
- call assert_fails('call term_setansicolors(buf, colors)', 'E474:')
- call assert_fails('call term_setansicolors(buf, {})', 'E714:')
-
- call StopShellInTerminal(buf)
- call TermWait(buf)
- call assert_equal(0, term_setansicolors(buf, []))
- exe buf . 'bwipe'
-endfunc
-
-func Test_terminal_all_ansi_colors()
- CheckRunVimInTerminal
-
- " Use all the ANSI colors.
- call writefile([
- \ 'call setline(1, "AABBCCDDEEFFGGHHIIJJKKLLMMNNOOPP XXYYZZ")',
- \ 'hi Tblack ctermfg=0 ctermbg=8',
- \ 'hi Tdarkred ctermfg=1 ctermbg=9',
- \ 'hi Tdarkgreen ctermfg=2 ctermbg=10',
- \ 'hi Tbrown ctermfg=3 ctermbg=11',
- \ 'hi Tdarkblue ctermfg=4 ctermbg=12',
- \ 'hi Tdarkmagenta ctermfg=5 ctermbg=13',
- \ 'hi Tdarkcyan ctermfg=6 ctermbg=14',
- \ 'hi Tlightgrey ctermfg=7 ctermbg=15',
- \ 'hi Tdarkgrey ctermfg=8 ctermbg=0',
- \ 'hi Tred ctermfg=9 ctermbg=1',
- \ 'hi Tgreen ctermfg=10 ctermbg=2',
- \ 'hi Tyellow ctermfg=11 ctermbg=3',
- \ 'hi Tblue ctermfg=12 ctermbg=4',
- \ 'hi Tmagenta ctermfg=13 ctermbg=5',
- \ 'hi Tcyan ctermfg=14 ctermbg=6',
- \ 'hi Twhite ctermfg=15 ctermbg=7',
- \ 'hi TdarkredBold ctermfg=1 cterm=bold',
- \ 'hi TgreenBold ctermfg=10 cterm=bold',
- \ 'hi TmagentaBold ctermfg=13 cterm=bold ctermbg=5',
- \ '',
- \ 'call matchadd("Tblack", "A")',
- \ 'call matchadd("Tdarkred", "B")',
- \ 'call matchadd("Tdarkgreen", "C")',
- \ 'call matchadd("Tbrown", "D")',
- \ 'call matchadd("Tdarkblue", "E")',
- \ 'call matchadd("Tdarkmagenta", "F")',
- \ 'call matchadd("Tdarkcyan", "G")',
- \ 'call matchadd("Tlightgrey", "H")',
- \ 'call matchadd("Tdarkgrey", "I")',
- \ 'call matchadd("Tred", "J")',
- \ 'call matchadd("Tgreen", "K")',
- \ 'call matchadd("Tyellow", "L")',
- \ 'call matchadd("Tblue", "M")',
- \ 'call matchadd("Tmagenta", "N")',
- \ 'call matchadd("Tcyan", "O")',
- \ 'call matchadd("Twhite", "P")',
- \ 'call matchadd("TdarkredBold", "X")',
- \ 'call matchadd("TgreenBold", "Y")',
- \ 'call matchadd("TmagentaBold", "Z")',
- \ 'redraw',
- \ ], 'Xcolorscript')
- let buf = RunVimInTerminal('-S Xcolorscript', {'rows': 10})
- call VerifyScreenDump(buf, 'Test_terminal_all_ansi_colors', {})
-
- call term_sendkeys(buf, ":q\<CR>")
- call StopVimInTerminal(buf)
- call delete('Xcolorscript')
-endfunc
-
-func Test_terminal_termwinsize_option_fixed()
- CheckRunVimInTerminal
- set termwinsize=6x40
- let text = []
- for n in range(10)
- call add(text, repeat(n, 50))
- endfor
- call writefile(text, 'Xwinsize')
- let buf = RunVimInTerminal('Xwinsize', {})
- let win = bufwinid(buf)
- call assert_equal([6, 40], term_getsize(buf))
- call assert_equal(6, winheight(win))
- call assert_equal(40, winwidth(win))
-
- " resizing the window doesn't resize the terminal.
- resize 10
- vertical resize 60
- call assert_equal([6, 40], term_getsize(buf))
- call assert_equal(10, winheight(win))
- call assert_equal(60, winwidth(win))
-
- call StopVimInTerminal(buf)
- call delete('Xwinsize')
-
- call assert_fails('set termwinsize=40', 'E474')
- call assert_fails('set termwinsize=10+40', 'E474')
- call assert_fails('set termwinsize=abc', 'E474')
-
- set termwinsize=
-endfunc
-
-func Test_terminal_termwinsize_option_zero()
- set termwinsize=0x0
- let buf = Run_shell_in_terminal({})
- let win = bufwinid(buf)
- call assert_equal([winheight(win), winwidth(win)], term_getsize(buf))
- call StopShellInTerminal(buf)
- call TermWait(buf)
- exe buf . 'bwipe'
-
- set termwinsize=7x0
- let buf = Run_shell_in_terminal({})
- let win = bufwinid(buf)
- call assert_equal([7, winwidth(win)], term_getsize(buf))
- call StopShellInTerminal(buf)
- call TermWait(buf)
- exe buf . 'bwipe'
-
- set termwinsize=0x33
- let buf = Run_shell_in_terminal({})
- let win = bufwinid(buf)
- call assert_equal([winheight(win), 33], term_getsize(buf))
- call StopShellInTerminal(buf)
- call TermWait(buf)
- exe buf . 'bwipe'
-
- set termwinsize=
-endfunc
-
-func Test_terminal_termwinsize_minimum()
- set termwinsize=10*50
- vsplit
- let buf = Run_shell_in_terminal({})
- let win = bufwinid(buf)
- call assert_inrange(10, 1000, winheight(win))
- call assert_inrange(50, 1000, winwidth(win))
- call assert_equal([winheight(win), winwidth(win)], term_getsize(buf))
-
- resize 15
- vertical resize 60
- redraw
- call assert_equal([15, 60], term_getsize(buf))
- call assert_equal(15, winheight(win))
- call assert_equal(60, winwidth(win))
-
- resize 7
- vertical resize 30
- redraw
- call assert_equal([10, 50], term_getsize(buf))
- call assert_equal(7, winheight(win))
- call assert_equal(30, winwidth(win))
-
- call StopShellInTerminal(buf)
- call TermWait(buf)
- exe buf . 'bwipe'
-
- set termwinsize=0*0
- let buf = Run_shell_in_terminal({})
- let win = bufwinid(buf)
- call assert_equal([winheight(win), winwidth(win)], term_getsize(buf))
- call StopShellInTerminal(buf)
- call TermWait(buf)
- exe buf . 'bwipe'
-
- set termwinsize=
-endfunc
-
-func Test_terminal_termwinkey()
- " make three tabpages, terminal in the middle
- 0tabnew
- tabnext
- tabnew
- tabprev
- call assert_equal(1, winnr('$'))
- call assert_equal(2, tabpagenr())
- let thiswin = win_getid()
-
- let buf = Run_shell_in_terminal({})
- let termwin = bufwinid(buf)
- set termwinkey=<C-L>
- call feedkeys("\<C-L>w", 'tx')
- call assert_equal(thiswin, win_getid())
- call feedkeys("\<C-W>w", 'tx')
- call assert_equal(termwin, win_getid())
-
- if has('langmap')
- set langmap=xjyk
- call feedkeys("\<C-L>x", 'tx')
- call assert_equal(thiswin, win_getid())
- call feedkeys("\<C-W>y", 'tx')
- call assert_equal(termwin, win_getid())
- set langmap=
- endif
-
- call feedkeys("\<C-L>gt", "xt")
- call assert_equal(3, tabpagenr())
- tabprev
- call assert_equal(2, tabpagenr())
- call assert_equal(termwin, win_getid())
-
- call feedkeys("\<C-L>gT", "xt")
- call assert_equal(1, tabpagenr())
- tabnext
- call assert_equal(2, tabpagenr())
- call assert_equal(termwin, win_getid())
-
- let job = term_getjob(buf)
- call feedkeys("\<C-L>\<C-C>", 'tx')
- call WaitForAssert({-> assert_equal("dead", job_status(job))})
-
- set termwinkey&
- tabnext
- tabclose
- tabprev
- tabclose
-endfunc
-
-func Test_terminal_out_err()
- CheckUnix
-
- call writefile([
- \ '#!/bin/sh',
- \ 'echo "this is standard error" >&2',
- \ 'echo "this is standard out" >&1',
- \ ], 'Xechoerrout.sh')
- call setfperm('Xechoerrout.sh', 'rwxrwx---')
-
- let outfile = 'Xtermstdout'
- let buf = term_start(['./Xechoerrout.sh'], {'out_io': 'file', 'out_name': outfile})
-
- call WaitFor({-> !empty(readfile(outfile)) && !empty(term_getline(buf, 1))})
- call assert_equal(['this is standard out'], readfile(outfile))
- call assert_equal('this is standard error', term_getline(buf, 1))
-
- call WaitForAssert({-> assert_equal('dead', job_status(term_getjob(buf)))})
- exe buf . 'bwipe'
- call delete('Xechoerrout.sh')
- call delete(outfile)
-endfunc
-
-func Test_termwinscroll()
- CheckUnix
-
- " Let the terminal output more than 'termwinscroll' lines, some at the start
- " will be dropped.
- exe 'set termwinscroll=' . &lines
- let buf = term_start('/bin/sh')
- for i in range(1, &lines)
- call feedkeys("echo " . i . "\<CR>", 'xt')
- call WaitForAssert({-> assert_match(string(i), term_getline(buf, term_getcursor(buf)[0] - 1))})
- endfor
- " Go to Terminal-Normal mode to update the buffer.
- call feedkeys("\<C-W>N", 'xt')
- call assert_inrange(&lines, &lines * 110 / 100 + winheight(0), line('$'))
-
- " Every "echo nr" must only appear once
- let lines = getline(1, line('$'))
- for i in range(&lines - len(lines) / 2 + 2, &lines)
- let filtered = filter(copy(lines), {idx, val -> val =~ 'echo ' . i . '\>'})
- call assert_equal(1, len(filtered), 'for "echo ' . i . '"')
- endfor
-
- exe buf . 'bwipe!'
-endfunc
-
-" Resizing the terminal window caused an ml_get error.
-" TODO: This does not reproduce the original problem.
-func Test_terminal_resize()
- set statusline=x
- terminal
- call assert_equal(2, winnr('$'))
-
- " Fill the terminal with text.
- if has('win32')
- call feedkeys("dir\<CR>", 'xt')
- else
- call feedkeys("ls\<CR>", 'xt')
- endif
- " Go to Terminal-Normal mode for a moment.
- call feedkeys("\<C-W>N", 'xt')
- " Open a new window
- call feedkeys("i\<C-W>n", 'xt')
- call assert_equal(3, winnr('$'))
- redraw
-
- close
- call assert_equal(2, winnr('$'))
- call feedkeys("exit\<CR>", 'xt')
- set statusline&
-endfunc
-
-" must be nearly the last, we can't go back from GUI to terminal
-func Test_zz1_terminal_in_gui()
- CheckCanRunGui
-
- " Ignore the "failed to create input context" error.
- call test_ignore_error('E285:')
-
- gui -f
-
- call assert_equal(1, winnr('$'))
- let buf = Run_shell_in_terminal({'term_finish': 'close'})
- call StopShellInTerminal(buf)
- call TermWait(buf)
-
- " closing window wipes out the terminal buffer a with finished job
- call WaitForAssert({-> assert_equal(1, winnr('$'))})
- call assert_equal("", bufname(buf))
-
- unlet g:job
-endfunc
-
-func Test_zz2_terminal_guioptions_bang()
- CheckGui
- set guioptions+=!
-
- let filename = 'Xtestscript'
- if has('win32')
- let filename .= '.bat'
- let prefix = ''
- let contents = ['@echo off', 'exit %1']
- else
- let filename .= '.sh'
- let prefix = './'
- let contents = ['#!/bin/sh', 'exit $1']
- endif
- call writefile(contents, filename)
- call setfperm(filename, 'rwxrwx---')
-
- " Check if v:shell_error is equal to the exit status.
- let exitval = 0
- execute printf(':!%s%s %d', prefix, filename, exitval)
- call assert_equal(exitval, v:shell_error)
-
- let exitval = 9
- execute printf(':!%s%s %d', prefix, filename, exitval)
- call assert_equal(exitval, v:shell_error)
-
- set guioptions&
- call delete(filename)
-endfunc
-
-func Test_terminal_hidden()
- CheckUnix
-
- term ++hidden cat
- let bnr = bufnr('$')
- call assert_equal('terminal', getbufvar(bnr, '&buftype'))
- exe 'sbuf ' . bnr
- call assert_equal('terminal', &buftype)
- call term_sendkeys(bnr, "asdf\<CR>")
- call WaitForAssert({-> assert_match('asdf', term_getline(bnr, 2))})
- call term_sendkeys(bnr, "\<C-D>")
- call WaitForAssert({-> assert_equal('finished', bnr->term_getstatus())})
- bwipe!
-endfunc
-
-func Test_terminal_switch_mode()
- term
- let bnr = bufnr('$')
- call WaitForAssert({-> assert_equal('running', term_getstatus(bnr))})
- call feedkeys("\<C-W>N", 'xt')
- call WaitForAssert({-> assert_equal('running,normal', term_getstatus(bnr))})
- call feedkeys("A", 'xt')
- call WaitForAssert({-> assert_equal('running', term_getstatus(bnr))})
- call feedkeys("\<C-\>\<C-N>", 'xt')
- call WaitForAssert({-> assert_equal('running,normal', term_getstatus(bnr))})
- call feedkeys("I", 'xt')
- call WaitForAssert({-> assert_equal('running', term_getstatus(bnr))})
- call feedkeys("\<C-W>Nv", 'xt')
- call WaitForAssert({-> assert_equal('running,normal', term_getstatus(bnr))})
- call feedkeys("I", 'xt')
- call WaitForAssert({-> assert_equal('running', term_getstatus(bnr))})
- call feedkeys("\<C-W>Nv", 'xt')
- call WaitForAssert({-> assert_equal('running,normal', term_getstatus(bnr))})
- call feedkeys("A", 'xt')
- call WaitForAssert({-> assert_equal('running', term_getstatus(bnr))})
- bwipe!
-endfunc
-
-func Test_terminal_normal_mode()
- CheckRunVimInTerminal
-
- " Run Vim in a terminal and open a terminal window to run Vim in.
- let lines =<< trim END
- call setline(1, range(11111, 11122))
- 3
- END
- call writefile(lines, 'XtermNormal')
- let buf = RunVimInTerminal('-S XtermNormal', {'rows': 8})
- call TermWait(buf)
-
- call term_sendkeys(buf, "\<C-W>N")
- call term_sendkeys(buf, ":set number cursorline culopt=both\r")
- call VerifyScreenDump(buf, 'Test_terminal_normal_1', {})
-
- call term_sendkeys(buf, ":set culopt=number\r")
- call VerifyScreenDump(buf, 'Test_terminal_normal_2', {})
-
- call term_sendkeys(buf, ":set culopt=line\r")
- call VerifyScreenDump(buf, 'Test_terminal_normal_3', {})
-
- call assert_fails('call term_sendkeys(buf, [])', 'E730:')
- call term_sendkeys(buf, "a:q!\<CR>:q\<CR>:q\<CR>")
- call StopVimInTerminal(buf)
- call delete('XtermNormal')
-endfunc
-
-func Test_terminal_hidden_and_close()
- CheckUnix
-
- call assert_equal(1, winnr('$'))
- term ++hidden ++close ls
- let bnr = bufnr('$')
- call assert_equal('terminal', getbufvar(bnr, '&buftype'))
- call WaitForAssert({-> assert_false(bufexists(bnr))})
- call assert_equal(1, winnr('$'))
-endfunc
-
-func Test_terminal_does_not_truncate_last_newlines()
- " This test does not pass through ConPTY.
- if has('conpty')
- return
- endif
- let contents = [
- \ [ 'One', '', 'X' ],
- \ [ 'Two', '', '' ],
- \ [ 'Three' ] + repeat([''], 30)
- \ ]
-
- for c in contents
- call writefile(c, 'Xfile')
- if has('win32')
- term cmd /c type Xfile
- else
- term cat Xfile
- endif
- let bnr = bufnr('$')
- call assert_equal('terminal', getbufvar(bnr, '&buftype'))
- call WaitForAssert({-> assert_equal('finished', term_getstatus(bnr))})
- sleep 100m
- call assert_equal(c, getline(1, line('$')))
- quit
- endfor
-
- call delete('Xfile')
-endfunc
-
-func Test_terminal_no_job()
- if has('win32')
- let cmd = 'cmd /c ""'
- else
- CheckExecutable false
- let cmd = 'false'
- endif
- let term = term_start(cmd, {'term_finish': 'close'})
- call WaitForAssert({-> assert_equal(v:null, term_getjob(term)) })
-endfunc
-
-func Test_term_getcursor()
- CheckUnix
-
- let buf = Run_shell_in_terminal({})
-
- " Wait for the shell to display a prompt.
- call WaitForAssert({-> assert_notequal('', term_getline(buf, 1))})
-
- " Hide the cursor.
- call term_sendkeys(buf, "echo -e '\\033[?25l'\r")
- call WaitForAssert({-> assert_equal(0, term_getcursor(buf)[2].visible)})
-
- " Show the cursor.
- call term_sendkeys(buf, "echo -e '\\033[?25h'\r")
- call WaitForAssert({-> assert_equal(1, buf->term_getcursor()[2].visible)})
-
- " Change color of cursor.
- call WaitForAssert({-> assert_equal('', term_getcursor(buf)[2].color)})
- call term_sendkeys(buf, "echo -e '\\033]12;blue\\007'\r")
- call WaitForAssert({-> assert_equal('blue', term_getcursor(buf)[2].color)})
- call term_sendkeys(buf, "echo -e '\\033]12;green\\007'\r")
- call WaitForAssert({-> assert_equal('green', term_getcursor(buf)[2].color)})
-
- " Make cursor a blinking block.
- call term_sendkeys(buf, "echo -e '\\033[1 q'\r")
- call WaitForAssert({-> assert_equal([1, 1],
- \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
-
- " Make cursor a steady block.
- call term_sendkeys(buf, "echo -e '\\033[2 q'\r")
- call WaitForAssert({-> assert_equal([0, 1],
- \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
-
- " Make cursor a blinking underline.
- call term_sendkeys(buf, "echo -e '\\033[3 q'\r")
- call WaitForAssert({-> assert_equal([1, 2],
- \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
-
- " Make cursor a steady underline.
- call term_sendkeys(buf, "echo -e '\\033[4 q'\r")
- call WaitForAssert({-> assert_equal([0, 2],
- \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
-
- " Make cursor a blinking vertical bar.
- call term_sendkeys(buf, "echo -e '\\033[5 q'\r")
- call WaitForAssert({-> assert_equal([1, 3],
- \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
-
- " Make cursor a steady vertical bar.
- call term_sendkeys(buf, "echo -e '\\033[6 q'\r")
- call WaitForAssert({-> assert_equal([0, 3],
- \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
-
- call StopShellInTerminal(buf)
-endfunc
-
-" Test for term_gettitle()
-func Test_term_gettitle()
- " term_gettitle() returns an empty string for a non-terminal buffer
- " and for a non-existing buffer.
- call assert_equal('', bufnr('%')->term_gettitle())
- call assert_equal('', term_gettitle(bufnr('$') + 1))
-
- if !has('title') || empty(&t_ts)
- throw "Skipped: can't get/set title"
- endif
-
- let term = term_start([GetVimProg(), '--clean', '-c', 'set noswapfile', '-c', 'set title'])
- if has('autoservername')
- call WaitForAssert({-> assert_match('^\[No Name\] - VIM\d\+$', term_gettitle(term)) })
- call term_sendkeys(term, ":e Xfoo\r")
- call WaitForAssert({-> assert_match('^Xfoo (.*[/\\]testdir) - VIM\d\+$', term_gettitle(term)) })
- else
- call WaitForAssert({-> assert_equal('[No Name] - VIM', term_gettitle(term)) })
- call term_sendkeys(term, ":e Xfoo\r")
- call WaitForAssert({-> assert_match('^Xfoo (.*[/\\]testdir) - VIM$', term_gettitle(term)) })
- endif
-
- call term_sendkeys(term, ":set titlestring=foo\r")
- call WaitForAssert({-> assert_equal('foo', term_gettitle(term)) })
-
- exe term . 'bwipe!'
-endfunc
-
-func Test_term_gettty()
- let buf = Run_shell_in_terminal({})
- let gettty = term_gettty(buf)
-
- if has('unix') && executable('tty')
- " Find tty using the tty shell command.
- call WaitForAssert({-> assert_notequal('', term_getline(buf, 1))})
- call term_sendkeys(buf, "tty\r")
- call WaitForAssert({-> assert_notequal('', term_getline(buf, 3))})
- let tty = term_getline(buf, 2)
- call assert_equal(tty, gettty)
- endif
-
- let gettty0 = term_gettty(buf, 0)
- let gettty1 = term_gettty(buf, 1)
-
- call assert_equal(gettty, gettty0)
- call assert_equal(job_info(g:job).tty_out, gettty0)
- call assert_equal(job_info(g:job).tty_in, gettty1)
-
- if has('unix')
- " For unix, term_gettty(..., 0) and term_gettty(..., 1)
- " are identical according to :help term_gettty()
- call assert_equal(gettty0, gettty1)
- call assert_match('^/dev/', gettty)
- else
- " ConPTY works on anonymous pipe.
- if !has('conpty')
- call assert_match('^\\\\.\\pipe\\', gettty0)
- call assert_match('^\\\\.\\pipe\\', gettty1)
- endif
- endif
-
- call assert_fails('call term_gettty(buf, 2)', 'E475:')
- call assert_fails('call term_gettty(buf, -1)', 'E475:')
-
- call assert_equal('', term_gettty(buf + 1))
-
- call StopShellInTerminal(buf)
- call TermWait(buf)
- exe buf . 'bwipe'
-endfunc
-
" When drawing the statusline the cursor position may not have been updated
" yet.
" 1. create a terminal, make it show 2 lines
@@ -2297,619 +1359,5 @@
set statusline=
endfunc
-func Test_terminal_getwinpos()
- CheckRunVimInTerminal
-
- " split, go to the bottom-right window
- split
- wincmd j
- set splitright
-
- call writefile([
- \ 'echo getwinpos()',
- \ ], 'XTest_getwinpos')
- let buf = RunVimInTerminal('-S XTest_getwinpos', {'cols': 60})
- call TermWait(buf)
-
- " Find the output of getwinpos() in the bottom line.
- let rows = term_getsize(buf)[0]
- call WaitForAssert({-> assert_match('\[\d\+, \d\+\]', term_getline(buf, rows))})
- let line = term_getline(buf, rows)
- let xpos = str2nr(substitute(line, '\[\(\d\+\), \d\+\]', '\1', ''))
- let ypos = str2nr(substitute(line, '\[\d\+, \(\d\+\)\]', '\1', ''))
-
- " Position must be bigger than the getwinpos() result of Vim itself.
- " The calculation in the console assumes a 10 x 7 character cell.
- " In the GUI it can be more, let's assume a 20 x 14 cell.
- " And then add 100 / 200 tolerance.
- let [xroot, yroot] = getwinpos()
- let winpos = 50->getwinpos()
- call assert_equal(xroot, winpos[0])
- call assert_equal(yroot, winpos[1])
- let [winrow, wincol] = win_screenpos('.')
- let xoff = wincol * (has('gui_running') ? 14 : 7) + 100
- let yoff = winrow * (has('gui_running') ? 20 : 10) + 200
- call assert_inrange(xroot + 2, xroot + xoff, xpos)
- call assert_inrange(yroot + 2, yroot + yoff, ypos)
-
- call TermWait(buf)
- call term_sendkeys(buf, ":q\<CR>")
- call StopVimInTerminal(buf)
- call delete('XTest_getwinpos')
- exe buf . 'bwipe!'
- set splitright&
- only!
-endfunc
-
-func Test_terminal_altscreen()
- " somehow doesn't work on MS-Windows
- CheckUnix
- let cmd = "cat Xtext\<CR>"
-
- let buf = term_start(&shell, {})
- call writefile(["\<Esc>[?1047h"], 'Xtext')
- call term_sendkeys(buf, cmd)
- call WaitForAssert({-> assert_equal(1, term_getaltscreen(buf))})
-
- call writefile(["\<Esc>[?1047l"], 'Xtext')
- call term_sendkeys(buf, cmd)
- call WaitForAssert({-> assert_equal(0, term_getaltscreen(buf))})
-
- call term_sendkeys(buf, "exit\r")
- exe buf . "bwipe!"
- call delete('Xtext')
-endfunc
-
-func Test_terminal_shell_option()
- if has('unix')
- " exec is a shell builtin command, should fail without a shell.
- term exec ls runtest.vim
- call WaitForAssert({-> assert_match('job failed', term_getline(bufnr(), 1))})
- bwipe!
-
- term ++shell exec ls runtest.vim
- call WaitForAssert({-> assert_match('runtest.vim', term_getline(bufnr(), 1))})
- bwipe!
- elseif has('win32')
- " dir is a shell builtin command, should fail without a shell.
- try
- term dir /b runtest.vim
- call WaitForAssert({-> assert_match('job failed\|cannot access .*: No such file or directory', term_getline(bufnr(), 1))})
- catch /CreateProcess/
- " ignore
- endtry
- bwipe!
-
- term ++shell dir /b runtest.vim
- call WaitForAssert({-> assert_match('runtest.vim', term_getline(bufnr(), 1))})
- bwipe!
- endif
-endfunc
-
-func Test_terminal_setapi_and_call()
- CheckRunVimInTerminal
-
- call WriteApiCall('Tapi_TryThis')
- call ch_logfile('Xlog', 'w')
-
- unlet! g:called_bufnum
- unlet! g:called_arg
-
- let buf = RunVimInTerminal('-S Xscript', {'term_api': ''})
- call WaitForAssert({-> assert_match('Unpermitted function: Tapi_TryThis', string(readfile('Xlog')))})
- call assert_false(exists('g:called_bufnum'))
- call assert_false(exists('g:called_arg'))
-
- eval buf->term_setapi('Tapi_')
- call term_sendkeys(buf, ":set notitle\<CR>")
- call term_sendkeys(buf, ":source Xscript\<CR>")
- call WaitFor({-> exists('g:called_bufnum')})
- call assert_equal(buf, g:called_bufnum)
- call assert_equal(['hello', 123], g:called_arg)
-
- call StopVimInTerminal(buf)
-
- call delete('Xscript')
- call ch_logfile('')
- call delete('Xlog')
- unlet! g:called_bufnum
- unlet! g:called_arg
-endfunc
-
-func Test_terminal_api_arg()
- CheckRunVimInTerminal
-
- call WriteApiCall('Tapi_TryThis')
- call ch_logfile('Xlog', 'w')
-
- unlet! g:called_bufnum
- unlet! g:called_arg
-
- execute 'term ++api= ' .. GetVimCommandCleanTerm() .. '-S Xscript'
- let buf = bufnr('%')
- call WaitForAssert({-> assert_match('Unpermitted function: Tapi_TryThis', string(readfile('Xlog')))})
- call assert_false(exists('g:called_bufnum'))
- call assert_false(exists('g:called_arg'))
-
- call StopVimInTerminal(buf)
-
- call ch_logfile('Xlog', 'w')
-
- execute 'term ++api=Tapi_ ' .. GetVimCommandCleanTerm() .. '-S Xscript'
- let buf = bufnr('%')
- call WaitFor({-> exists('g:called_bufnum')})
- call assert_equal(buf, g:called_bufnum)
- call assert_equal(['hello', 123], g:called_arg)
-
- call StopVimInTerminal(buf)
-
- call delete('Xscript')
- call ch_logfile('')
- call delete('Xlog')
- unlet! g:called_bufnum
- unlet! g:called_arg
-endfunc
-
-func Test_terminal_invalid_arg()
- call assert_fails('terminal ++xyz', 'E181:')
-endfunc
-
-func Test_terminal_in_popup()
- CheckRunVimInTerminal
-
- let text =<< trim END
- some text
- to edit
- in a popup window
- END
- call writefile(text, 'Xtext')
- let cmd = GetVimCommandCleanTerm()
- let lines = [
- \ 'call setline(1, range(20))',
- \ 'hi PopTerm ctermbg=grey',
- \ 'func OpenTerm(setColor)',
- \ " set noruler",
- \ " let s:buf = term_start('" .. cmd .. " Xtext', #{hidden: 1, term_finish: 'close'})",
- \ ' let g:winid = popup_create(s:buf, #{minwidth: 45, minheight: 7, border: [], drag: 1, resize: 1})',
- \ ' if a:setColor',
- \ ' call win_execute(g:winid, "set wincolor=PopTerm")',
- \ ' endif',
- \ 'endfunc',
- \ 'func HidePopup()',
- \ ' call popup_hide(g:winid)',
- \ 'endfunc',
- \ 'func ClosePopup()',
- \ ' call popup_close(g:winid)',
- \ 'endfunc',
- \ 'func ReopenPopup()',
- \ ' call popup_create(s:buf, #{minwidth: 40, minheight: 6, border: []})',
- \ 'endfunc',
- \ ]
- call writefile(lines, 'XtermPopup')
- let buf = RunVimInTerminal('-S XtermPopup', #{rows: 15})
- call TermWait(buf, 100)
- call term_sendkeys(buf, ":call OpenTerm(0)\<CR>")
- call TermWait(buf, 100)
- call term_sendkeys(buf, ":\<CR>")
- call TermWait(buf, 100)
- call term_sendkeys(buf, "\<C-W>:echo getwinvar(g:winid, \"&buftype\") win_gettype(g:winid)\<CR>")
- call VerifyScreenDump(buf, 'Test_terminal_popup_1', {})
-
- call term_sendkeys(buf, ":q\<CR>")
- call VerifyScreenDump(buf, 'Test_terminal_popup_2', {})
-
- call term_sendkeys(buf, ":call OpenTerm(1)\<CR>")
- call TermWait(buf, 150)
- call term_sendkeys(buf, ":set hlsearch\<CR>")
- call TermWait(buf, 100)
- call term_sendkeys(buf, "/edit\<CR>")
- call VerifyScreenDump(buf, 'Test_terminal_popup_3', {})
-
- call term_sendkeys(buf, "\<C-W>:call HidePopup()\<CR>")
- call VerifyScreenDump(buf, 'Test_terminal_popup_4', {})
- call term_sendkeys(buf, "\<CR>")
- call TermWait(buf, 50)
-
- call term_sendkeys(buf, "\<C-W>:call ClosePopup()\<CR>")
- call VerifyScreenDump(buf, 'Test_terminal_popup_5', {})
-
- call term_sendkeys(buf, "\<C-W>:call ReopenPopup()\<CR>")
- call VerifyScreenDump(buf, 'Test_terminal_popup_6', {})
-
- " Go to terminal-Normal mode and visually select text.
- call term_sendkeys(buf, "\<C-W>Ngg/in\<CR>vww")
- call VerifyScreenDump(buf, 'Test_terminal_popup_7', {})
-
- " Back to job mode, redraws
- call term_sendkeys(buf, "A")
- call VerifyScreenDump(buf, 'Test_terminal_popup_8', {})
-
- call TermWait(buf, 50)
- call term_sendkeys(buf, ":q\<CR>")
- call TermWait(buf, 150) " wait for terminal to vanish
-
- call StopVimInTerminal(buf)
- call delete('Xtext')
- call delete('XtermPopup')
-endfunc
-
-" Check a terminal in popup window uses the default mininum size.
-func Test_terminal_in_popup_min_size()
- CheckRunVimInTerminal
-
- let text =<< trim END
- another text
- to show
- in a popup window
- END
- call writefile(text, 'Xtext')
- let lines = [
- \ 'call setline(1, range(20))',
- \ 'func OpenTerm()',
- \ " let s:buf = term_start('cat Xtext', #{hidden: 1})",
- \ ' let g:winid = popup_create(s:buf, #{ border: []})',
- \ 'endfunc',
- \ ]
- call writefile(lines, 'XtermPopup')
- let buf = RunVimInTerminal('-S XtermPopup', #{rows: 15})
- call TermWait(buf, 100)
- call term_sendkeys(buf, ":set noruler\<CR>")
- call term_sendkeys(buf, ":call OpenTerm()\<CR>")
- call TermWait(buf, 50)
- call term_sendkeys(buf, ":\<CR>")
- call VerifyScreenDump(buf, 'Test_terminal_popup_m1', {})
-
- call TermWait(buf, 50)
- call term_sendkeys(buf, ":q\<CR>")
- call TermWait(buf, 50) " wait for terminal to vanish
- call StopVimInTerminal(buf)
- call delete('Xtext')
- call delete('XtermPopup')
-endfunc
-
-" Check a terminal in popup window with different colors
-func Terminal_in_popup_colored(group_name, highlight_cmd, highlight_opt)
- CheckRunVimInTerminal
- CheckUnix
-
- let lines = [
- \ 'call setline(1, range(20))',
- \ 'func OpenTerm()',
- \ " let s:buf = term_start('cat', #{hidden: 1, "
- \ .. a:highlight_opt .. "})",
- \ ' let g:winid = popup_create(s:buf, #{ border: []})',
- \ 'endfunc',
- \ a:highlight_cmd,
- \ ]
- call writefile(lines, 'XtermPopup')
- let buf = RunVimInTerminal('-S XtermPopup', #{rows: 15})
- call TermWait(buf, 100)
- call term_sendkeys(buf, ":set noruler\<CR>")
- call term_sendkeys(buf, ":call OpenTerm()\<CR>")
- call TermWait(buf, 50)
- call term_sendkeys(buf, "hello\<CR>")
- call VerifyScreenDump(buf, 'Test_terminal_popup_' .. a:group_name, {})
-
- call term_sendkeys(buf, "\<C-D>")
- call TermWait(buf, 50)
- call term_sendkeys(buf, ":q\<CR>")
- call TermWait(buf, 50) " wait for terminal to vanish
- call StopVimInTerminal(buf)
- call delete('XtermPopup')
-endfunc
-
-func Test_terminal_in_popup_colored_Terminal()
- call Terminal_in_popup_colored("Terminal", "highlight Terminal ctermfg=blue ctermbg=yellow", "")
-endfunc
-
-func Test_terminal_in_popup_colored_group()
- call Terminal_in_popup_colored("MyTermCol", "highlight MyTermCol ctermfg=darkgreen ctermbg=lightblue", "term_highlight: 'MyTermCol',")
-endfunc
-
-func Test_double_popup_terminal()
- let buf1 = term_start(&shell, #{hidden: 1})
- let win1 = popup_create(buf1, {})
- let buf2 = term_start(&shell, #{hidden: 1})
- call assert_fails('call popup_create(buf2, {})', 'E861:')
- call popup_close(win1)
- exe buf1 .. 'bwipe!'
- exe buf2 .. 'bwipe!'
-endfunc
-
-func Test_issue_5607()
- let wincount = winnr('$')
- exe 'terminal' &shell &shellcmdflag 'exit'
- let job = term_getjob(bufnr())
- call WaitForAssert({-> assert_equal("dead", job_status(job))})
-
- let old_wincolor = &wincolor
- try
- set wincolor=
- finally
- let &wincolor = old_wincolor
- bw!
- endtry
-endfunc
-
-func Test_hidden_terminal()
- let buf = term_start(&shell, #{hidden: 1})
- call assert_equal('', bufname('^$'))
- call StopShellInTerminal(buf)
-endfunc
-
-func Test_term_nasty_callback()
- CheckExecutable sh
-
- set hidden
- let g:buf0 = term_start('sh', #{hidden: 1, term_finish: 'close'})
- call popup_create(g:buf0, {})
- call assert_fails("call term_start(['sh', '-c'], #{curwin: 1})", 'E863:')
-
- call popup_clear(1)
- set hidden&
-endfunc
-
-func Test_term_and_startinsert()
- CheckRunVimInTerminal
- CheckUnix
-
- let lines =<< trim EOL
- put='some text'
- term
- startinsert
- EOL
- call writefile(lines, 'XTest_startinsert')
- let buf = RunVimInTerminal('-S XTest_startinsert', {})
-
- call term_sendkeys(buf, "exit\r")
- call WaitForAssert({-> assert_equal("some text", term_getline(buf, 1))})
- call term_sendkeys(buf, "0l")
- call term_sendkeys(buf, "A<\<Esc>")
- call WaitForAssert({-> assert_equal("some text<", term_getline(buf, 1))})
-
- call StopVimInTerminal(buf)
- call delete('XTest_startinsert')
-endfunc
-
-" Test for passing invalid arguments to terminal functions
-func Test_term_func_invalid_arg()
- call assert_fails('let b = term_getaltscreen([])', 'E745:')
- call assert_fails('let a = term_getattr(1, [])', 'E730:')
- call assert_fails('let c = term_getcursor([])', 'E745:')
- call assert_fails('let l = term_getline([], 1)', 'E745:')
- call assert_fails('let l = term_getscrolled([])', 'E745:')
- call assert_fails('let s = term_getsize([])', 'E745:')
- call assert_fails('let s = term_getstatus([])', 'E745:')
- call assert_fails('let s = term_scrape([], 1)', 'E745:')
- call assert_fails('call term_sendkeys([], "a")', 'E745:')
- call assert_fails('call term_setapi([], "")', 'E745:')
- call assert_fails('call term_setrestore([], "")', 'E745:')
- call assert_fails('call term_setkill([], "")', 'E745:')
- if has('gui') || has('termguicolors')
- call assert_fails('let p = term_getansicolors([])', 'E745:')
- call assert_fails('call term_setansicolors([], [])', 'E745:')
- endif
-endfunc
-
-" Test for sending various special keycodes to a terminal
-func Test_term_keycode_translation()
- CheckRunVimInTerminal
-
- let buf = RunVimInTerminal('', {})
- call term_sendkeys(buf, ":set nocompatible\<CR>")
-
- let keys = ["\<F1>", "\<F2>", "\<F3>", "\<F4>", "\<F5>", "\<F6>", "\<F7>",
- \ "\<F8>", "\<F9>", "\<F10>", "\<F11>", "\<F12>", "\<Home>",
- \ "\<S-Home>", "\<C-Home>", "\<End>", "\<S-End>", "\<C-End>",
- \ "\<Ins>", "\<Del>", "\<Left>", "\<S-Left>", "\<C-Left>", "\<Right>",
- \ "\<S-Right>", "\<C-Right>", "\<Up>", "\<S-Up>", "\<Down>",
- \ "\<S-Down>"]
- let output = ['<F1>', '<F2>', '<F3>', '<F4>', '<F5>', '<F6>', '<F7>',
- \ '<F8>', '<F9>', '<F10>', '<F11>', '<F12>', '<Home>', '<S-Home>',
- \ '<C-Home>', '<End>', '<S-End>', '<C-End>', '<Insert>', '<Del>',
- \ '<Left>', '<S-Left>', '<C-Left>', '<Right>', '<S-Right>',
- \ '<C-Right>', '<Up>', '<S-Up>', '<Down>', '<S-Down>']
-
- call term_sendkeys(buf, "i")
- for i in range(len(keys))
- call term_sendkeys(buf, "\<C-U>\<C-K>" .. keys[i])
- call WaitForAssert({-> assert_equal(output[i], term_getline(buf, 1))})
- endfor
-
- let keypad_keys = ["\<k0>", "\<k1>", "\<k2>", "\<k3>", "\<k4>", "\<k5>",
- \ "\<k6>", "\<k7>", "\<k8>", "\<k9>", "\<kPoint>", "\<kPlus>",
- \ "\<kMinus>", "\<kMultiply>", "\<kDivide>"]
- let keypad_output = ['0', '1', '2', '3', '4', '5',
- \ '6', '7', '8', '9', '.', '+',
- \ '-', '*', '/']
- for i in range(len(keypad_keys))
- " TODO: Mysteriously keypad 3 and 9 do not work on some systems.
- if keypad_output[i] == '3' || keypad_output[i] == '9'
- continue
- endif
- call term_sendkeys(buf, "\<C-U>" .. keypad_keys[i])
- call WaitForAssert({-> assert_equal(keypad_output[i], term_getline(buf, 1))})
- endfor
-
- call feedkeys("\<C-U>\<kEnter>\<BS>one\<C-W>.two", 'xt')
- call WaitForAssert({-> assert_equal('two', term_getline(buf, 1))})
-
- call StopVimInTerminal(buf)
-endfunc
-
-" Test for using the mouse in a terminal
-func Test_term_mouse()
- CheckNotGui
- CheckRunVimInTerminal
-
- let save_mouse = &mouse
- let save_term = &term
- let save_ttymouse = &ttymouse
- let save_clipboard = &clipboard
- set mouse=a term=xterm ttymouse=sgr mousetime=200 clipboard=
-
- let lines =<< trim END
- one two three four five
- red green yellow red blue
- vim emacs sublime nano
- END
- call writefile(lines, 'Xtest_mouse')
-
- " Create a terminal window running Vim for the test with mouse enabled
- let prev_win = win_getid()
- let buf = RunVimInTerminal('Xtest_mouse -n', {})
- call term_sendkeys(buf, ":set nocompatible\<CR>")
- call term_sendkeys(buf, ":set mouse=a term=xterm ttymouse=sgr\<CR>")
- call term_sendkeys(buf, ":set clipboard=\<CR>")
- call term_sendkeys(buf, ":set mousemodel=extend\<CR>")
- call term_wait(buf)
- redraw!
-
- " Use the mouse to enter the terminal window
- call win_gotoid(prev_win)
- call feedkeys(MouseLeftClickCode(1, 1), 'x')
- call feedkeys(MouseLeftReleaseCode(1, 1), 'x')
- call assert_equal(1, getwininfo(win_getid())[0].terminal)
-
- " Test for <LeftMouse> click/release
- call test_setmouse(2, 5)
- call feedkeys("\<LeftMouse>\<LeftRelease>", 'xt')
- call test_setmouse(3, 8)
- call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>")
- call term_wait(buf, 50)
- call term_sendkeys(buf, ":call writefile([json_encode(getpos('.'))], 'Xbuf')\<CR>")
- call term_wait(buf, 50)
- let pos = json_decode(readfile('Xbuf')[0])
- call assert_equal([3, 8], pos[1:2])
-
- " Test for selecting text using mouse
- call delete('Xbuf')
- call test_setmouse(2, 11)
- call term_sendkeys(buf, "\<LeftMouse>")
- call test_setmouse(2, 16)
- call term_sendkeys(buf, "\<LeftRelease>y")
- call term_wait(buf, 50)
- call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
- call term_wait(buf, 50)
- call assert_equal('yellow', readfile('Xbuf')[0])
-
- " Test for selecting text using doubleclick
- call delete('Xbuf')
- call test_setmouse(1, 11)
- call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>\<LeftMouse>")
- call test_setmouse(1, 17)
- call term_sendkeys(buf, "\<LeftRelease>y")
- call term_wait(buf, 50)
- call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
- call term_wait(buf, 50)
- call assert_equal('three four', readfile('Xbuf')[0])
-
- " Test for selecting a line using triple click
- call delete('Xbuf')
- call test_setmouse(3, 2)
- call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>y")
- call term_wait(buf, 50)
- call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
- call term_wait(buf, 50)
- call assert_equal("vim emacs sublime nano\n", readfile('Xbuf')[0])
-
- " Test for selecting a block using qudraple click
- call delete('Xbuf')
- call test_setmouse(1, 11)
- call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>\<LeftMouse>")
- call test_setmouse(3, 13)
- call term_sendkeys(buf, "\<LeftRelease>y")
- call term_wait(buf, 50)
- call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
- call term_wait(buf, 50)
- call assert_equal("ree\nyel\nsub", readfile('Xbuf')[0])
-
- " Test for extending a selection using right click
- call delete('Xbuf')
- call test_setmouse(2, 9)
- call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>")
- call test_setmouse(2, 16)
- call term_sendkeys(buf, "\<RightMouse>\<RightRelease>y")
- call term_wait(buf, 50)
- call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
- call term_wait(buf, 50)
- call assert_equal("n yellow", readfile('Xbuf')[0])
-
- " Test for pasting text using middle click
- call delete('Xbuf')
- call term_sendkeys(buf, ":let @r='bright '\<CR>")
- call test_setmouse(2, 22)
- call term_sendkeys(buf, "\"r\<MiddleMouse>\<MiddleRelease>")
- call term_wait(buf, 50)
- call term_sendkeys(buf, ":call writefile([getline(2)], 'Xbuf')\<CR>")
- call term_wait(buf, 50)
- call assert_equal("red bright blue", readfile('Xbuf')[0][-15:])
-
- " cleanup
- call term_wait(buf)
- call StopVimInTerminal(buf)
- let &mouse = save_mouse
- let &term = save_term
- let &ttymouse = save_ttymouse
- let &clipboard = save_clipboard
- set mousetime&
- call delete('Xtest_mouse')
- call delete('Xbuf')
-endfunc
-
-" Test for modeless selection in a terminal
-func Test_term_modeless_selection()
- CheckUnix
- CheckNotGui
- CheckRunVimInTerminal
- CheckFeature clipboard_working
-
- let save_mouse = &mouse
- let save_term = &term
- let save_ttymouse = &ttymouse
- set mouse=a term=xterm ttymouse=sgr mousetime=200
- set clipboard=autoselectml
-
- let lines =<< trim END
- one two three four five
- red green yellow red blue
- vim emacs sublime nano
- END
- call writefile(lines, 'Xtest_modeless')
-
- " Create a terminal window running Vim for the test with mouse disabled
- let prev_win = win_getid()
- let buf = RunVimInTerminal('Xtest_modeless -n', {})
- call term_sendkeys(buf, ":set nocompatible\<CR>")
- call term_sendkeys(buf, ":set mouse=\<CR>")
- call term_wait(buf)
- redraw!
-
- " Use the mouse to enter the terminal window
- call win_gotoid(prev_win)
- call feedkeys(MouseLeftClickCode(1, 1), 'x')
- call feedkeys(MouseLeftReleaseCode(1, 1), 'x')
- call term_wait(buf)
- call assert_equal(1, getwininfo(win_getid())[0].terminal)
-
- " Test for copying a modeless selection to clipboard
- let @* = 'clean'
- " communicating with X server may take a little time
- sleep 100m
- call feedkeys(MouseLeftClickCode(2, 3), 'x')
- call feedkeys(MouseLeftDragCode(2, 11), 'x')
- call feedkeys(MouseLeftReleaseCode(2, 11), 'x')
- call assert_equal("d green y", @*)
-
- " cleanup
- call term_wait(buf)
- call StopVimInTerminal(buf)
- let &mouse = save_mouse
- let &term = save_term
- let &ttymouse = save_ttymouse
- set mousetime& clipboard&
- call delete('Xtest_modeless')
- new | only!
-endfunc
" vim: shiftwidth=2 sts=2 expandtab
diff --git a/src/testdir/test_terminal2.vim b/src/testdir/test_terminal2.vim
new file mode 100644
index 0000000..bd89957
--- /dev/null
+++ b/src/testdir/test_terminal2.vim
@@ -0,0 +1,1550 @@
+" Tests for the terminal window.
+" This is split in two, because it can take a lot of time.
+" See test_terminal2.vim for further tests.
+
+source check.vim
+CheckFeature terminal
+
+source shared.vim
+source screendump.vim
+source mouse.vim
+source term_util.vim
+
+let s:python = PythonProg()
+let $PROMPT_COMMAND=''
+
+func Api_drop_common(options)
+ call assert_equal(1, winnr('$'))
+
+ " Use the title termcap entries to output the escape sequence.
+ call writefile([
+ \ 'set title',
+ \ 'exe "set t_ts=\<Esc>]51; t_fs=\x07"',
+ \ 'let &titlestring = ''["drop","Xtextfile"' . a:options . ']''',
+ \ 'redraw',
+ \ "set t_ts=",
+ \ ], 'Xscript')
+ let buf = RunVimInTerminal('-S Xscript', {})
+ call WaitFor({-> bufnr('Xtextfile') > 0})
+ call assert_equal('Xtextfile', expand('%:t'))
+ call assert_true(winnr('$') >= 3)
+ return buf
+endfunc
+
+func Test_terminal_api_drop_newwin()
+ CheckRunVimInTerminal
+ let buf = Api_drop_common('')
+ call assert_equal(0, &bin)
+ call assert_equal('', &fenc)
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ bwipe Xtextfile
+endfunc
+
+func Test_terminal_api_drop_newwin_bin()
+ CheckRunVimInTerminal
+ let buf = Api_drop_common(',{"bin":1}')
+ call assert_equal(1, &bin)
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ bwipe Xtextfile
+endfunc
+
+func Test_terminal_api_drop_newwin_binary()
+ CheckRunVimInTerminal
+ let buf = Api_drop_common(',{"binary":1}')
+ call assert_equal(1, &bin)
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ bwipe Xtextfile
+endfunc
+
+func Test_terminal_api_drop_newwin_nobin()
+ CheckRunVimInTerminal
+ set binary
+ let buf = Api_drop_common(',{"nobin":1}')
+ call assert_equal(0, &bin)
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ bwipe Xtextfile
+ set nobinary
+endfunc
+
+func Test_terminal_api_drop_newwin_nobinary()
+ CheckRunVimInTerminal
+ set binary
+ let buf = Api_drop_common(',{"nobinary":1}')
+ call assert_equal(0, &bin)
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ bwipe Xtextfile
+ set nobinary
+endfunc
+
+func Test_terminal_api_drop_newwin_ff()
+ CheckRunVimInTerminal
+ let buf = Api_drop_common(',{"ff":"dos"}')
+ call assert_equal("dos", &ff)
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ bwipe Xtextfile
+endfunc
+
+func Test_terminal_api_drop_newwin_fileformat()
+ CheckRunVimInTerminal
+ let buf = Api_drop_common(',{"fileformat":"dos"}')
+ call assert_equal("dos", &ff)
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ bwipe Xtextfile
+endfunc
+
+func Test_terminal_api_drop_newwin_enc()
+ CheckRunVimInTerminal
+ let buf = Api_drop_common(',{"enc":"utf-16"}')
+ call assert_equal("utf-16", &fenc)
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ bwipe Xtextfile
+endfunc
+
+func Test_terminal_api_drop_newwin_encoding()
+ CheckRunVimInTerminal
+ let buf = Api_drop_common(',{"encoding":"utf-16"}')
+ call assert_equal("utf-16", &fenc)
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ bwipe Xtextfile
+endfunc
+
+func Test_terminal_api_drop_oldwin()
+ CheckRunVimInTerminal
+ let firstwinid = win_getid()
+ split Xtextfile
+ let textfile_winid = win_getid()
+ call assert_equal(2, winnr('$'))
+ call win_gotoid(firstwinid)
+
+ " Use the title termcap entries to output the escape sequence.
+ call writefile([
+ \ 'set title',
+ \ 'exe "set t_ts=\<Esc>]51; t_fs=\x07"',
+ \ 'let &titlestring = ''["drop","Xtextfile"]''',
+ \ 'redraw',
+ \ "set t_ts=",
+ \ ], 'Xscript')
+ let buf = RunVimInTerminal('-S Xscript', {'rows': 10})
+ call WaitForAssert({-> assert_equal('Xtextfile', expand('%:t'))})
+ call assert_equal(textfile_winid, win_getid())
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ bwipe Xtextfile
+endfunc
+
+func Tapi_TryThis(bufnum, arg)
+ let g:called_bufnum = a:bufnum
+ let g:called_arg = a:arg
+endfunc
+
+func WriteApiCall(funcname)
+ " Use the title termcap entries to output the escape sequence.
+ call writefile([
+ \ 'set title',
+ \ 'exe "set t_ts=\<Esc>]51; t_fs=\x07"',
+ \ 'let &titlestring = ''["call","' . a:funcname . '",["hello",123]]''',
+ \ 'redraw',
+ \ "set t_ts=",
+ \ ], 'Xscript')
+endfunc
+
+func Test_terminal_api_call()
+ CheckRunVimInTerminal
+
+ unlet! g:called_bufnum
+ unlet! g:called_arg
+
+ call WriteApiCall('Tapi_TryThis')
+
+ " Default
+ let buf = RunVimInTerminal('-S Xscript', {})
+ call WaitFor({-> exists('g:called_bufnum')})
+ call assert_equal(buf, g:called_bufnum)
+ call assert_equal(['hello', 123], g:called_arg)
+ call StopVimInTerminal(buf)
+
+ unlet! g:called_bufnum
+ unlet! g:called_arg
+
+ " Enable explicitly
+ let buf = RunVimInTerminal('-S Xscript', {'term_api': 'Tapi_Try'})
+ call WaitFor({-> exists('g:called_bufnum')})
+ call assert_equal(buf, g:called_bufnum)
+ call assert_equal(['hello', 123], g:called_arg)
+ call StopVimInTerminal(buf)
+
+ unlet! g:called_bufnum
+ unlet! g:called_arg
+
+ func! ApiCall_TryThis(bufnum, arg)
+ let g:called_bufnum2 = a:bufnum
+ let g:called_arg2 = a:arg
+ endfunc
+
+ call WriteApiCall('ApiCall_TryThis')
+
+ " Use prefix match
+ let buf = RunVimInTerminal('-S Xscript', {'term_api': 'ApiCall_'})
+ call WaitFor({-> exists('g:called_bufnum2')})
+ call assert_equal(buf, g:called_bufnum2)
+ call assert_equal(['hello', 123], g:called_arg2)
+ call StopVimInTerminal(buf)
+
+ call assert_fails("call term_start('ls', {'term_api' : []})", 'E475:')
+
+ unlet! g:called_bufnum2
+ unlet! g:called_arg2
+
+ call delete('Xscript')
+ delfunction! ApiCall_TryThis
+ unlet! g:called_bufnum2
+ unlet! g:called_arg2
+endfunc
+
+func Test_terminal_api_call_fails()
+ CheckRunVimInTerminal
+
+ func! TryThis(bufnum, arg)
+ let g:called_bufnum3 = a:bufnum
+ let g:called_arg3 = a:arg
+ endfunc
+
+ call WriteApiCall('TryThis')
+
+ unlet! g:called_bufnum3
+ unlet! g:called_arg3
+
+ " Not permitted
+ call ch_logfile('Xlog', 'w')
+ let buf = RunVimInTerminal('-S Xscript', {'term_api': ''})
+ call WaitForAssert({-> assert_match('Unpermitted function: TryThis', string(readfile('Xlog')))})
+ call assert_false(exists('g:called_bufnum3'))
+ call assert_false(exists('g:called_arg3'))
+ call StopVimInTerminal(buf)
+
+ " No match
+ call ch_logfile('Xlog', 'w')
+ let buf = RunVimInTerminal('-S Xscript', {'term_api': 'TryThat'})
+ call WaitFor({-> string(readfile('Xlog')) =~ 'Unpermitted function: TryThis'})
+ call assert_false(exists('g:called_bufnum3'))
+ call assert_false(exists('g:called_arg3'))
+ call StopVimInTerminal(buf)
+
+ call delete('Xscript')
+ call ch_logfile('')
+ call delete('Xlog')
+ delfunction! TryThis
+ unlet! g:called_bufnum3
+ unlet! g:called_arg3
+endfunc
+
+let s:caught_e937 = 0
+
+func Tapi_Delete(bufnum, arg)
+ try
+ execute 'bdelete!' a:bufnum
+ catch /E937:/
+ let s:caught_e937 = 1
+ endtry
+endfunc
+
+func Test_terminal_api_call_fail_delete()
+ CheckRunVimInTerminal
+
+ call WriteApiCall('Tapi_Delete')
+ let buf = RunVimInTerminal('-S Xscript', {})
+ call WaitForAssert({-> assert_equal(1, s:caught_e937)})
+
+ call StopVimInTerminal(buf)
+ call delete('Xscript')
+ call ch_logfile('', '')
+endfunc
+
+func Test_terminal_ansicolors_default()
+ CheckFunction term_getansicolors
+
+ let colors = [
+ \ '#000000', '#e00000',
+ \ '#00e000', '#e0e000',
+ \ '#0000e0', '#e000e0',
+ \ '#00e0e0', '#e0e0e0',
+ \ '#808080', '#ff4040',
+ \ '#40ff40', '#ffff40',
+ \ '#4040ff', '#ff40ff',
+ \ '#40ffff', '#ffffff',
+ \]
+
+ let buf = Run_shell_in_terminal({})
+ call assert_equal(colors, term_getansicolors(buf))
+ call StopShellInTerminal(buf)
+ call TermWait(buf)
+ call assert_equal([], term_getansicolors(buf))
+
+ exe buf . 'bwipe'
+endfunc
+
+let s:test_colors = [
+ \ '#616e64', '#0d0a79',
+ \ '#6d610d', '#0a7373',
+ \ '#690d0a', '#6d696e',
+ \ '#0d0a6f', '#616e0d',
+ \ '#0a6479', '#6d0d0a',
+ \ '#617373', '#0d0a69',
+ \ '#6d690d', '#0a6e6f',
+ \ '#610d0a', '#6e6479',
+ \]
+
+func Test_terminal_ansicolors_global()
+ CheckFeature termguicolors
+ CheckFunction term_getansicolors
+
+ let g:terminal_ansi_colors = reverse(copy(s:test_colors))
+ let buf = Run_shell_in_terminal({})
+ call assert_equal(g:terminal_ansi_colors, term_getansicolors(buf))
+ call StopShellInTerminal(buf)
+ call TermWait(buf)
+
+ exe buf . 'bwipe'
+ unlet g:terminal_ansi_colors
+endfunc
+
+func Test_terminal_ansicolors_func()
+ CheckFeature termguicolors
+ CheckFunction term_getansicolors
+
+ let g:terminal_ansi_colors = reverse(copy(s:test_colors))
+ let buf = Run_shell_in_terminal({'ansi_colors': s:test_colors})
+ call assert_equal(s:test_colors, term_getansicolors(buf))
+
+ call term_setansicolors(buf, g:terminal_ansi_colors)
+ call assert_equal(g:terminal_ansi_colors, buf->term_getansicolors())
+
+ let colors = [
+ \ 'ivory', 'AliceBlue',
+ \ 'grey67', 'dark goldenrod',
+ \ 'SteelBlue3', 'PaleVioletRed4',
+ \ 'MediumPurple2', 'yellow2',
+ \ 'RosyBrown3', 'OrangeRed2',
+ \ 'white smoke', 'navy blue',
+ \ 'grey47', 'gray97',
+ \ 'MistyRose2', 'DodgerBlue4',
+ \]
+ eval buf->term_setansicolors(colors)
+
+ let colors[4] = 'Invalid'
+ call assert_fails('call term_setansicolors(buf, colors)', 'E474:')
+ call assert_fails('call term_setansicolors(buf, {})', 'E714:')
+
+ call StopShellInTerminal(buf)
+ call TermWait(buf)
+ call assert_equal(0, term_setansicolors(buf, []))
+ exe buf . 'bwipe'
+endfunc
+
+func Test_terminal_all_ansi_colors()
+ CheckRunVimInTerminal
+
+ " Use all the ANSI colors.
+ call writefile([
+ \ 'call setline(1, "AABBCCDDEEFFGGHHIIJJKKLLMMNNOOPP XXYYZZ")',
+ \ 'hi Tblack ctermfg=0 ctermbg=8',
+ \ 'hi Tdarkred ctermfg=1 ctermbg=9',
+ \ 'hi Tdarkgreen ctermfg=2 ctermbg=10',
+ \ 'hi Tbrown ctermfg=3 ctermbg=11',
+ \ 'hi Tdarkblue ctermfg=4 ctermbg=12',
+ \ 'hi Tdarkmagenta ctermfg=5 ctermbg=13',
+ \ 'hi Tdarkcyan ctermfg=6 ctermbg=14',
+ \ 'hi Tlightgrey ctermfg=7 ctermbg=15',
+ \ 'hi Tdarkgrey ctermfg=8 ctermbg=0',
+ \ 'hi Tred ctermfg=9 ctermbg=1',
+ \ 'hi Tgreen ctermfg=10 ctermbg=2',
+ \ 'hi Tyellow ctermfg=11 ctermbg=3',
+ \ 'hi Tblue ctermfg=12 ctermbg=4',
+ \ 'hi Tmagenta ctermfg=13 ctermbg=5',
+ \ 'hi Tcyan ctermfg=14 ctermbg=6',
+ \ 'hi Twhite ctermfg=15 ctermbg=7',
+ \ 'hi TdarkredBold ctermfg=1 cterm=bold',
+ \ 'hi TgreenBold ctermfg=10 cterm=bold',
+ \ 'hi TmagentaBold ctermfg=13 cterm=bold ctermbg=5',
+ \ '',
+ \ 'call matchadd("Tblack", "A")',
+ \ 'call matchadd("Tdarkred", "B")',
+ \ 'call matchadd("Tdarkgreen", "C")',
+ \ 'call matchadd("Tbrown", "D")',
+ \ 'call matchadd("Tdarkblue", "E")',
+ \ 'call matchadd("Tdarkmagenta", "F")',
+ \ 'call matchadd("Tdarkcyan", "G")',
+ \ 'call matchadd("Tlightgrey", "H")',
+ \ 'call matchadd("Tdarkgrey", "I")',
+ \ 'call matchadd("Tred", "J")',
+ \ 'call matchadd("Tgreen", "K")',
+ \ 'call matchadd("Tyellow", "L")',
+ \ 'call matchadd("Tblue", "M")',
+ \ 'call matchadd("Tmagenta", "N")',
+ \ 'call matchadd("Tcyan", "O")',
+ \ 'call matchadd("Twhite", "P")',
+ \ 'call matchadd("TdarkredBold", "X")',
+ \ 'call matchadd("TgreenBold", "Y")',
+ \ 'call matchadd("TmagentaBold", "Z")',
+ \ 'redraw',
+ \ ], 'Xcolorscript')
+ let buf = RunVimInTerminal('-S Xcolorscript', {'rows': 10})
+ call VerifyScreenDump(buf, 'Test_terminal_all_ansi_colors', {})
+
+ call term_sendkeys(buf, ":q\<CR>")
+ call StopVimInTerminal(buf)
+ call delete('Xcolorscript')
+endfunc
+
+func Test_terminal_termwinsize_option_fixed()
+ CheckRunVimInTerminal
+ set termwinsize=6x40
+ let text = []
+ for n in range(10)
+ call add(text, repeat(n, 50))
+ endfor
+ call writefile(text, 'Xwinsize')
+ let buf = RunVimInTerminal('Xwinsize', {})
+ let win = bufwinid(buf)
+ call assert_equal([6, 40], term_getsize(buf))
+ call assert_equal(6, winheight(win))
+ call assert_equal(40, winwidth(win))
+
+ " resizing the window doesn't resize the terminal.
+ resize 10
+ vertical resize 60
+ call assert_equal([6, 40], term_getsize(buf))
+ call assert_equal(10, winheight(win))
+ call assert_equal(60, winwidth(win))
+
+ call StopVimInTerminal(buf)
+ call delete('Xwinsize')
+
+ call assert_fails('set termwinsize=40', 'E474')
+ call assert_fails('set termwinsize=10+40', 'E474')
+ call assert_fails('set termwinsize=abc', 'E474')
+
+ set termwinsize=
+endfunc
+
+func Test_terminal_termwinsize_option_zero()
+ set termwinsize=0x0
+ let buf = Run_shell_in_terminal({})
+ let win = bufwinid(buf)
+ call assert_equal([winheight(win), winwidth(win)], term_getsize(buf))
+ call StopShellInTerminal(buf)
+ call TermWait(buf)
+ exe buf . 'bwipe'
+
+ set termwinsize=7x0
+ let buf = Run_shell_in_terminal({})
+ let win = bufwinid(buf)
+ call assert_equal([7, winwidth(win)], term_getsize(buf))
+ call StopShellInTerminal(buf)
+ call TermWait(buf)
+ exe buf . 'bwipe'
+
+ set termwinsize=0x33
+ let buf = Run_shell_in_terminal({})
+ let win = bufwinid(buf)
+ call assert_equal([winheight(win), 33], term_getsize(buf))
+ call StopShellInTerminal(buf)
+ call TermWait(buf)
+ exe buf . 'bwipe'
+
+ set termwinsize=
+endfunc
+
+func Test_terminal_termwinsize_minimum()
+ set termwinsize=10*50
+ vsplit
+ let buf = Run_shell_in_terminal({})
+ let win = bufwinid(buf)
+ call assert_inrange(10, 1000, winheight(win))
+ call assert_inrange(50, 1000, winwidth(win))
+ call assert_equal([winheight(win), winwidth(win)], term_getsize(buf))
+
+ resize 15
+ vertical resize 60
+ redraw
+ call assert_equal([15, 60], term_getsize(buf))
+ call assert_equal(15, winheight(win))
+ call assert_equal(60, winwidth(win))
+
+ resize 7
+ vertical resize 30
+ redraw
+ call assert_equal([10, 50], term_getsize(buf))
+ call assert_equal(7, winheight(win))
+ call assert_equal(30, winwidth(win))
+
+ call StopShellInTerminal(buf)
+ call TermWait(buf)
+ exe buf . 'bwipe'
+
+ set termwinsize=0*0
+ let buf = Run_shell_in_terminal({})
+ let win = bufwinid(buf)
+ call assert_equal([winheight(win), winwidth(win)], term_getsize(buf))
+ call StopShellInTerminal(buf)
+ call TermWait(buf)
+ exe buf . 'bwipe'
+
+ set termwinsize=
+endfunc
+
+func Test_terminal_termwinkey()
+ " make three tabpages, terminal in the middle
+ 0tabnew
+ tabnext
+ tabnew
+ tabprev
+ call assert_equal(1, winnr('$'))
+ call assert_equal(2, tabpagenr())
+ let thiswin = win_getid()
+
+ let buf = Run_shell_in_terminal({})
+ let termwin = bufwinid(buf)
+ set termwinkey=<C-L>
+ call feedkeys("\<C-L>w", 'tx')
+ call assert_equal(thiswin, win_getid())
+ call feedkeys("\<C-W>w", 'tx')
+ call assert_equal(termwin, win_getid())
+
+ if has('langmap')
+ set langmap=xjyk
+ call feedkeys("\<C-L>x", 'tx')
+ call assert_equal(thiswin, win_getid())
+ call feedkeys("\<C-W>y", 'tx')
+ call assert_equal(termwin, win_getid())
+ set langmap=
+ endif
+
+ call feedkeys("\<C-L>gt", "xt")
+ call assert_equal(3, tabpagenr())
+ tabprev
+ call assert_equal(2, tabpagenr())
+ call assert_equal(termwin, win_getid())
+
+ call feedkeys("\<C-L>gT", "xt")
+ call assert_equal(1, tabpagenr())
+ tabnext
+ call assert_equal(2, tabpagenr())
+ call assert_equal(termwin, win_getid())
+
+ let job = term_getjob(buf)
+ call feedkeys("\<C-L>\<C-C>", 'tx')
+ call WaitForAssert({-> assert_equal("dead", job_status(job))})
+
+ set termwinkey&
+ tabnext
+ tabclose
+ tabprev
+ tabclose
+endfunc
+
+func Test_terminal_out_err()
+ CheckUnix
+
+ call writefile([
+ \ '#!/bin/sh',
+ \ 'echo "this is standard error" >&2',
+ \ 'echo "this is standard out" >&1',
+ \ ], 'Xechoerrout.sh')
+ call setfperm('Xechoerrout.sh', 'rwxrwx---')
+
+ let outfile = 'Xtermstdout'
+ let buf = term_start(['./Xechoerrout.sh'], {'out_io': 'file', 'out_name': outfile})
+
+ call WaitFor({-> !empty(readfile(outfile)) && !empty(term_getline(buf, 1))})
+ call assert_equal(['this is standard out'], readfile(outfile))
+ call assert_equal('this is standard error', term_getline(buf, 1))
+
+ call WaitForAssert({-> assert_equal('dead', job_status(term_getjob(buf)))})
+ exe buf . 'bwipe'
+ call delete('Xechoerrout.sh')
+ call delete(outfile)
+endfunc
+
+func Test_termwinscroll()
+ CheckUnix
+
+ " Let the terminal output more than 'termwinscroll' lines, some at the start
+ " will be dropped.
+ exe 'set termwinscroll=' . &lines
+ let buf = term_start('/bin/sh')
+ for i in range(1, &lines)
+ call feedkeys("echo " . i . "\<CR>", 'xt')
+ call WaitForAssert({-> assert_match(string(i), term_getline(buf, term_getcursor(buf)[0] - 1))})
+ endfor
+ " Go to Terminal-Normal mode to update the buffer.
+ call feedkeys("\<C-W>N", 'xt')
+ call assert_inrange(&lines, &lines * 110 / 100 + winheight(0), line('$'))
+
+ " Every "echo nr" must only appear once
+ let lines = getline(1, line('$'))
+ for i in range(&lines - len(lines) / 2 + 2, &lines)
+ let filtered = filter(copy(lines), {idx, val -> val =~ 'echo ' . i . '\>'})
+ call assert_equal(1, len(filtered), 'for "echo ' . i . '"')
+ endfor
+
+ exe buf . 'bwipe!'
+endfunc
+
+" Resizing the terminal window caused an ml_get error.
+" TODO: This does not reproduce the original problem.
+func Test_terminal_resize()
+ set statusline=x
+ terminal
+ call assert_equal(2, winnr('$'))
+
+ " Fill the terminal with text.
+ if has('win32')
+ call feedkeys("dir\<CR>", 'xt')
+ else
+ call feedkeys("ls\<CR>", 'xt')
+ endif
+ " Go to Terminal-Normal mode for a moment.
+ call feedkeys("\<C-W>N", 'xt')
+ " Open a new window
+ call feedkeys("i\<C-W>n", 'xt')
+ call assert_equal(3, winnr('$'))
+ redraw
+
+ close
+ call assert_equal(2, winnr('$'))
+ call feedkeys("exit\<CR>", 'xt')
+ set statusline&
+endfunc
+
+" must be nearly the last, we can't go back from GUI to terminal
+func Test_zz1_terminal_in_gui()
+ CheckCanRunGui
+
+ " Ignore the "failed to create input context" error.
+ call test_ignore_error('E285:')
+
+ gui -f
+
+ call assert_equal(1, winnr('$'))
+ let buf = Run_shell_in_terminal({'term_finish': 'close'})
+ call StopShellInTerminal(buf)
+ call TermWait(buf)
+
+ " closing window wipes out the terminal buffer a with finished job
+ call WaitForAssert({-> assert_equal(1, winnr('$'))})
+ call assert_equal("", bufname(buf))
+
+ unlet g:job
+endfunc
+
+func Test_zz2_terminal_guioptions_bang()
+ CheckGui
+ set guioptions+=!
+
+ let filename = 'Xtestscript'
+ if has('win32')
+ let filename .= '.bat'
+ let prefix = ''
+ let contents = ['@echo off', 'exit %1']
+ else
+ let filename .= '.sh'
+ let prefix = './'
+ let contents = ['#!/bin/sh', 'exit $1']
+ endif
+ call writefile(contents, filename)
+ call setfperm(filename, 'rwxrwx---')
+
+ " Check if v:shell_error is equal to the exit status.
+ let exitval = 0
+ execute printf(':!%s%s %d', prefix, filename, exitval)
+ call assert_equal(exitval, v:shell_error)
+
+ let exitval = 9
+ execute printf(':!%s%s %d', prefix, filename, exitval)
+ call assert_equal(exitval, v:shell_error)
+
+ set guioptions&
+ call delete(filename)
+endfunc
+
+func Test_terminal_hidden()
+ CheckUnix
+
+ term ++hidden cat
+ let bnr = bufnr('$')
+ call assert_equal('terminal', getbufvar(bnr, '&buftype'))
+ exe 'sbuf ' . bnr
+ call assert_equal('terminal', &buftype)
+ call term_sendkeys(bnr, "asdf\<CR>")
+ call WaitForAssert({-> assert_match('asdf', term_getline(bnr, 2))})
+ call term_sendkeys(bnr, "\<C-D>")
+ call WaitForAssert({-> assert_equal('finished', bnr->term_getstatus())})
+ bwipe!
+endfunc
+
+func Test_terminal_switch_mode()
+ term
+ let bnr = bufnr('$')
+ call WaitForAssert({-> assert_equal('running', term_getstatus(bnr))})
+ call feedkeys("\<C-W>N", 'xt')
+ call WaitForAssert({-> assert_equal('running,normal', term_getstatus(bnr))})
+ call feedkeys("A", 'xt')
+ call WaitForAssert({-> assert_equal('running', term_getstatus(bnr))})
+ call feedkeys("\<C-\>\<C-N>", 'xt')
+ call WaitForAssert({-> assert_equal('running,normal', term_getstatus(bnr))})
+ call feedkeys("I", 'xt')
+ call WaitForAssert({-> assert_equal('running', term_getstatus(bnr))})
+ call feedkeys("\<C-W>Nv", 'xt')
+ call WaitForAssert({-> assert_equal('running,normal', term_getstatus(bnr))})
+ call feedkeys("I", 'xt')
+ call WaitForAssert({-> assert_equal('running', term_getstatus(bnr))})
+ call feedkeys("\<C-W>Nv", 'xt')
+ call WaitForAssert({-> assert_equal('running,normal', term_getstatus(bnr))})
+ call feedkeys("A", 'xt')
+ call WaitForAssert({-> assert_equal('running', term_getstatus(bnr))})
+ bwipe!
+endfunc
+
+func Test_terminal_normal_mode()
+ CheckRunVimInTerminal
+
+ " Run Vim in a terminal and open a terminal window to run Vim in.
+ let lines =<< trim END
+ call setline(1, range(11111, 11122))
+ 3
+ END
+ call writefile(lines, 'XtermNormal')
+ let buf = RunVimInTerminal('-S XtermNormal', {'rows': 8})
+ call TermWait(buf)
+
+ call term_sendkeys(buf, "\<C-W>N")
+ call term_sendkeys(buf, ":set number cursorline culopt=both\r")
+ call VerifyScreenDump(buf, 'Test_terminal_normal_1', {})
+
+ call term_sendkeys(buf, ":set culopt=number\r")
+ call VerifyScreenDump(buf, 'Test_terminal_normal_2', {})
+
+ call term_sendkeys(buf, ":set culopt=line\r")
+ call VerifyScreenDump(buf, 'Test_terminal_normal_3', {})
+
+ call assert_fails('call term_sendkeys(buf, [])', 'E730:')
+ call term_sendkeys(buf, "a:q!\<CR>:q\<CR>:q\<CR>")
+ call StopVimInTerminal(buf)
+ call delete('XtermNormal')
+endfunc
+
+func Test_terminal_hidden_and_close()
+ CheckUnix
+
+ call assert_equal(1, winnr('$'))
+ term ++hidden ++close ls
+ let bnr = bufnr('$')
+ call assert_equal('terminal', getbufvar(bnr, '&buftype'))
+ call WaitForAssert({-> assert_false(bufexists(bnr))})
+ call assert_equal(1, winnr('$'))
+endfunc
+
+func Test_terminal_does_not_truncate_last_newlines()
+ " This test does not pass through ConPTY.
+ if has('conpty')
+ return
+ endif
+ let contents = [
+ \ [ 'One', '', 'X' ],
+ \ [ 'Two', '', '' ],
+ \ [ 'Three' ] + repeat([''], 30)
+ \ ]
+
+ for c in contents
+ call writefile(c, 'Xfile')
+ if has('win32')
+ term cmd /c type Xfile
+ else
+ term cat Xfile
+ endif
+ let bnr = bufnr('$')
+ call assert_equal('terminal', getbufvar(bnr, '&buftype'))
+ call WaitForAssert({-> assert_equal('finished', term_getstatus(bnr))})
+ sleep 100m
+ call assert_equal(c, getline(1, line('$')))
+ quit
+ endfor
+
+ call delete('Xfile')
+endfunc
+
+func Test_terminal_no_job()
+ if has('win32')
+ let cmd = 'cmd /c ""'
+ else
+ CheckExecutable false
+ let cmd = 'false'
+ endif
+ let term = term_start(cmd, {'term_finish': 'close'})
+ call WaitForAssert({-> assert_equal(v:null, term_getjob(term)) })
+endfunc
+
+func Test_term_getcursor()
+ CheckUnix
+
+ let buf = Run_shell_in_terminal({})
+
+ " Wait for the shell to display a prompt.
+ call WaitForAssert({-> assert_notequal('', term_getline(buf, 1))})
+
+ " Hide the cursor.
+ call term_sendkeys(buf, "echo -e '\\033[?25l'\r")
+ call WaitForAssert({-> assert_equal(0, term_getcursor(buf)[2].visible)})
+
+ " Show the cursor.
+ call term_sendkeys(buf, "echo -e '\\033[?25h'\r")
+ call WaitForAssert({-> assert_equal(1, buf->term_getcursor()[2].visible)})
+
+ " Change color of cursor.
+ call WaitForAssert({-> assert_equal('', term_getcursor(buf)[2].color)})
+ call term_sendkeys(buf, "echo -e '\\033]12;blue\\007'\r")
+ call WaitForAssert({-> assert_equal('blue', term_getcursor(buf)[2].color)})
+ call term_sendkeys(buf, "echo -e '\\033]12;green\\007'\r")
+ call WaitForAssert({-> assert_equal('green', term_getcursor(buf)[2].color)})
+
+ " Make cursor a blinking block.
+ call term_sendkeys(buf, "echo -e '\\033[1 q'\r")
+ call WaitForAssert({-> assert_equal([1, 1],
+ \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
+
+ " Make cursor a steady block.
+ call term_sendkeys(buf, "echo -e '\\033[2 q'\r")
+ call WaitForAssert({-> assert_equal([0, 1],
+ \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
+
+ " Make cursor a blinking underline.
+ call term_sendkeys(buf, "echo -e '\\033[3 q'\r")
+ call WaitForAssert({-> assert_equal([1, 2],
+ \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
+
+ " Make cursor a steady underline.
+ call term_sendkeys(buf, "echo -e '\\033[4 q'\r")
+ call WaitForAssert({-> assert_equal([0, 2],
+ \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
+
+ " Make cursor a blinking vertical bar.
+ call term_sendkeys(buf, "echo -e '\\033[5 q'\r")
+ call WaitForAssert({-> assert_equal([1, 3],
+ \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
+
+ " Make cursor a steady vertical bar.
+ call term_sendkeys(buf, "echo -e '\\033[6 q'\r")
+ call WaitForAssert({-> assert_equal([0, 3],
+ \ [term_getcursor(buf)[2].blink, term_getcursor(buf)[2].shape])})
+
+ call StopShellInTerminal(buf)
+endfunc
+
+" Test for term_gettitle()
+func Test_term_gettitle()
+ " term_gettitle() returns an empty string for a non-terminal buffer
+ " and for a non-existing buffer.
+ call assert_equal('', bufnr('%')->term_gettitle())
+ call assert_equal('', term_gettitle(bufnr('$') + 1))
+
+ if !has('title') || empty(&t_ts)
+ throw "Skipped: can't get/set title"
+ endif
+
+ let term = term_start([GetVimProg(), '--clean', '-c', 'set noswapfile', '-c', 'set title'])
+ if has('autoservername')
+ call WaitForAssert({-> assert_match('^\[No Name\] - VIM\d\+$', term_gettitle(term)) })
+ call term_sendkeys(term, ":e Xfoo\r")
+ call WaitForAssert({-> assert_match('^Xfoo (.*[/\\]testdir) - VIM\d\+$', term_gettitle(term)) })
+ else
+ call WaitForAssert({-> assert_equal('[No Name] - VIM', term_gettitle(term)) })
+ call term_sendkeys(term, ":e Xfoo\r")
+ call WaitForAssert({-> assert_match('^Xfoo (.*[/\\]testdir) - VIM$', term_gettitle(term)) })
+ endif
+
+ call term_sendkeys(term, ":set titlestring=foo\r")
+ call WaitForAssert({-> assert_equal('foo', term_gettitle(term)) })
+
+ exe term . 'bwipe!'
+endfunc
+
+func Test_term_gettty()
+ let buf = Run_shell_in_terminal({})
+ let gettty = term_gettty(buf)
+
+ if has('unix') && executable('tty')
+ " Find tty using the tty shell command.
+ call WaitForAssert({-> assert_notequal('', term_getline(buf, 1))})
+ call term_sendkeys(buf, "tty\r")
+ call WaitForAssert({-> assert_notequal('', term_getline(buf, 3))})
+ let tty = term_getline(buf, 2)
+ call assert_equal(tty, gettty)
+ endif
+
+ let gettty0 = term_gettty(buf, 0)
+ let gettty1 = term_gettty(buf, 1)
+
+ call assert_equal(gettty, gettty0)
+ call assert_equal(job_info(g:job).tty_out, gettty0)
+ call assert_equal(job_info(g:job).tty_in, gettty1)
+
+ if has('unix')
+ " For unix, term_gettty(..., 0) and term_gettty(..., 1)
+ " are identical according to :help term_gettty()
+ call assert_equal(gettty0, gettty1)
+ call assert_match('^/dev/', gettty)
+ else
+ " ConPTY works on anonymous pipe.
+ if !has('conpty')
+ call assert_match('^\\\\.\\pipe\\', gettty0)
+ call assert_match('^\\\\.\\pipe\\', gettty1)
+ endif
+ endif
+
+ call assert_fails('call term_gettty(buf, 2)', 'E475:')
+ call assert_fails('call term_gettty(buf, -1)', 'E475:')
+
+ call assert_equal('', term_gettty(buf + 1))
+
+ call StopShellInTerminal(buf)
+ call TermWait(buf)
+ exe buf . 'bwipe'
+endfunc
+
+func Test_terminal_getwinpos()
+ CheckRunVimInTerminal
+
+ " split, go to the bottom-right window
+ split
+ wincmd j
+ set splitright
+
+ call writefile([
+ \ 'echo getwinpos()',
+ \ ], 'XTest_getwinpos')
+ let buf = RunVimInTerminal('-S XTest_getwinpos', {'cols': 60})
+ call TermWait(buf)
+
+ " Find the output of getwinpos() in the bottom line.
+ let rows = term_getsize(buf)[0]
+ call WaitForAssert({-> assert_match('\[\d\+, \d\+\]', term_getline(buf, rows))})
+ let line = term_getline(buf, rows)
+ let xpos = str2nr(substitute(line, '\[\(\d\+\), \d\+\]', '\1', ''))
+ let ypos = str2nr(substitute(line, '\[\d\+, \(\d\+\)\]', '\1', ''))
+
+ " Position must be bigger than the getwinpos() result of Vim itself.
+ " The calculation in the console assumes a 10 x 7 character cell.
+ " In the GUI it can be more, let's assume a 20 x 14 cell.
+ " And then add 100 / 200 tolerance.
+ let [xroot, yroot] = getwinpos()
+ let winpos = 50->getwinpos()
+ call assert_equal(xroot, winpos[0])
+ call assert_equal(yroot, winpos[1])
+ let [winrow, wincol] = win_screenpos('.')
+ let xoff = wincol * (has('gui_running') ? 14 : 7) + 100
+ let yoff = winrow * (has('gui_running') ? 20 : 10) + 200
+ call assert_inrange(xroot + 2, xroot + xoff, xpos)
+ call assert_inrange(yroot + 2, yroot + yoff, ypos)
+
+ call TermWait(buf)
+ call term_sendkeys(buf, ":q\<CR>")
+ call StopVimInTerminal(buf)
+ call delete('XTest_getwinpos')
+ exe buf . 'bwipe!'
+ set splitright&
+ only!
+endfunc
+
+func Test_terminal_altscreen()
+ " somehow doesn't work on MS-Windows
+ CheckUnix
+ let cmd = "cat Xtext\<CR>"
+
+ let buf = term_start(&shell, {})
+ call writefile(["\<Esc>[?1047h"], 'Xtext')
+ call term_sendkeys(buf, cmd)
+ call WaitForAssert({-> assert_equal(1, term_getaltscreen(buf))})
+
+ call writefile(["\<Esc>[?1047l"], 'Xtext')
+ call term_sendkeys(buf, cmd)
+ call WaitForAssert({-> assert_equal(0, term_getaltscreen(buf))})
+
+ call term_sendkeys(buf, "exit\r")
+ exe buf . "bwipe!"
+ call delete('Xtext')
+endfunc
+
+func Test_terminal_shell_option()
+ if has('unix')
+ " exec is a shell builtin command, should fail without a shell.
+ term exec ls runtest.vim
+ call WaitForAssert({-> assert_match('job failed', term_getline(bufnr(), 1))})
+ bwipe!
+
+ term ++shell exec ls runtest.vim
+ call WaitForAssert({-> assert_match('runtest.vim', term_getline(bufnr(), 1))})
+ bwipe!
+ elseif has('win32')
+ " dir is a shell builtin command, should fail without a shell.
+ try
+ term dir /b runtest.vim
+ call WaitForAssert({-> assert_match('job failed\|cannot access .*: No such file or directory', term_getline(bufnr(), 1))})
+ catch /CreateProcess/
+ " ignore
+ endtry
+ bwipe!
+
+ term ++shell dir /b runtest.vim
+ call WaitForAssert({-> assert_match('runtest.vim', term_getline(bufnr(), 1))})
+ bwipe!
+ endif
+endfunc
+
+func Test_terminal_setapi_and_call()
+ CheckRunVimInTerminal
+
+ call WriteApiCall('Tapi_TryThis')
+ call ch_logfile('Xlog', 'w')
+
+ unlet! g:called_bufnum
+ unlet! g:called_arg
+
+ let buf = RunVimInTerminal('-S Xscript', {'term_api': ''})
+ call WaitForAssert({-> assert_match('Unpermitted function: Tapi_TryThis', string(readfile('Xlog')))})
+ call assert_false(exists('g:called_bufnum'))
+ call assert_false(exists('g:called_arg'))
+
+ eval buf->term_setapi('Tapi_')
+ call term_sendkeys(buf, ":set notitle\<CR>")
+ call term_sendkeys(buf, ":source Xscript\<CR>")
+ call WaitFor({-> exists('g:called_bufnum')})
+ call assert_equal(buf, g:called_bufnum)
+ call assert_equal(['hello', 123], g:called_arg)
+
+ call StopVimInTerminal(buf)
+
+ call delete('Xscript')
+ call ch_logfile('')
+ call delete('Xlog')
+ unlet! g:called_bufnum
+ unlet! g:called_arg
+endfunc
+
+func Test_terminal_api_arg()
+ CheckRunVimInTerminal
+
+ call WriteApiCall('Tapi_TryThis')
+ call ch_logfile('Xlog', 'w')
+
+ unlet! g:called_bufnum
+ unlet! g:called_arg
+
+ execute 'term ++api= ' .. GetVimCommandCleanTerm() .. '-S Xscript'
+ let buf = bufnr('%')
+ call WaitForAssert({-> assert_match('Unpermitted function: Tapi_TryThis', string(readfile('Xlog')))})
+ call assert_false(exists('g:called_bufnum'))
+ call assert_false(exists('g:called_arg'))
+
+ call StopVimInTerminal(buf)
+
+ call ch_logfile('Xlog', 'w')
+
+ execute 'term ++api=Tapi_ ' .. GetVimCommandCleanTerm() .. '-S Xscript'
+ let buf = bufnr('%')
+ call WaitFor({-> exists('g:called_bufnum')})
+ call assert_equal(buf, g:called_bufnum)
+ call assert_equal(['hello', 123], g:called_arg)
+
+ call StopVimInTerminal(buf)
+
+ call delete('Xscript')
+ call ch_logfile('')
+ call delete('Xlog')
+ unlet! g:called_bufnum
+ unlet! g:called_arg
+endfunc
+
+func Test_terminal_invalid_arg()
+ call assert_fails('terminal ++xyz', 'E181:')
+endfunc
+
+func Test_terminal_in_popup()
+ CheckRunVimInTerminal
+
+ let text =<< trim END
+ some text
+ to edit
+ in a popup window
+ END
+ call writefile(text, 'Xtext')
+ let cmd = GetVimCommandCleanTerm()
+ let lines = [
+ \ 'call setline(1, range(20))',
+ \ 'hi PopTerm ctermbg=grey',
+ \ 'func OpenTerm(setColor)',
+ \ " set noruler",
+ \ " let s:buf = term_start('" .. cmd .. " Xtext', #{hidden: 1, term_finish: 'close'})",
+ \ ' let g:winid = popup_create(s:buf, #{minwidth: 45, minheight: 7, border: [], drag: 1, resize: 1})',
+ \ ' if a:setColor',
+ \ ' call win_execute(g:winid, "set wincolor=PopTerm")',
+ \ ' endif',
+ \ 'endfunc',
+ \ 'func HidePopup()',
+ \ ' call popup_hide(g:winid)',
+ \ 'endfunc',
+ \ 'func ClosePopup()',
+ \ ' call popup_close(g:winid)',
+ \ 'endfunc',
+ \ 'func ReopenPopup()',
+ \ ' call popup_create(s:buf, #{minwidth: 40, minheight: 6, border: []})',
+ \ 'endfunc',
+ \ ]
+ call writefile(lines, 'XtermPopup')
+ let buf = RunVimInTerminal('-S XtermPopup', #{rows: 15})
+ call TermWait(buf, 100)
+ call term_sendkeys(buf, ":call OpenTerm(0)\<CR>")
+ call TermWait(buf, 100)
+ call term_sendkeys(buf, ":\<CR>")
+ call TermWait(buf, 100)
+ call term_sendkeys(buf, "\<C-W>:echo getwinvar(g:winid, \"&buftype\") win_gettype(g:winid)\<CR>")
+ call VerifyScreenDump(buf, 'Test_terminal_popup_1', {})
+
+ call term_sendkeys(buf, ":q\<CR>")
+ call VerifyScreenDump(buf, 'Test_terminal_popup_2', {})
+
+ call term_sendkeys(buf, ":call OpenTerm(1)\<CR>")
+ call TermWait(buf, 150)
+ call term_sendkeys(buf, ":set hlsearch\<CR>")
+ call TermWait(buf, 100)
+ call term_sendkeys(buf, "/edit\<CR>")
+ call VerifyScreenDump(buf, 'Test_terminal_popup_3', {})
+
+ call term_sendkeys(buf, "\<C-W>:call HidePopup()\<CR>")
+ call VerifyScreenDump(buf, 'Test_terminal_popup_4', {})
+ call term_sendkeys(buf, "\<CR>")
+ call TermWait(buf, 50)
+
+ call term_sendkeys(buf, "\<C-W>:call ClosePopup()\<CR>")
+ call VerifyScreenDump(buf, 'Test_terminal_popup_5', {})
+
+ call term_sendkeys(buf, "\<C-W>:call ReopenPopup()\<CR>")
+ call VerifyScreenDump(buf, 'Test_terminal_popup_6', {})
+
+ " Go to terminal-Normal mode and visually select text.
+ call term_sendkeys(buf, "\<C-W>Ngg/in\<CR>vww")
+ call VerifyScreenDump(buf, 'Test_terminal_popup_7', {})
+
+ " Back to job mode, redraws
+ call term_sendkeys(buf, "A")
+ call VerifyScreenDump(buf, 'Test_terminal_popup_8', {})
+
+ call TermWait(buf, 50)
+ call term_sendkeys(buf, ":q\<CR>")
+ call TermWait(buf, 150) " wait for terminal to vanish
+
+ call StopVimInTerminal(buf)
+ call delete('Xtext')
+ call delete('XtermPopup')
+endfunc
+
+" Check a terminal in popup window uses the default mininum size.
+func Test_terminal_in_popup_min_size()
+ CheckRunVimInTerminal
+
+ let text =<< trim END
+ another text
+ to show
+ in a popup window
+ END
+ call writefile(text, 'Xtext')
+ let lines = [
+ \ 'call setline(1, range(20))',
+ \ 'func OpenTerm()',
+ \ " let s:buf = term_start('cat Xtext', #{hidden: 1})",
+ \ ' let g:winid = popup_create(s:buf, #{ border: []})',
+ \ 'endfunc',
+ \ ]
+ call writefile(lines, 'XtermPopup')
+ let buf = RunVimInTerminal('-S XtermPopup', #{rows: 15})
+ call TermWait(buf, 100)
+ call term_sendkeys(buf, ":set noruler\<CR>")
+ call term_sendkeys(buf, ":call OpenTerm()\<CR>")
+ call TermWait(buf, 50)
+ call term_sendkeys(buf, ":\<CR>")
+ call VerifyScreenDump(buf, 'Test_terminal_popup_m1', {})
+
+ call TermWait(buf, 50)
+ call term_sendkeys(buf, ":q\<CR>")
+ call TermWait(buf, 50) " wait for terminal to vanish
+ call StopVimInTerminal(buf)
+ call delete('Xtext')
+ call delete('XtermPopup')
+endfunc
+
+" Check a terminal in popup window with different colors
+func Terminal_in_popup_colored(group_name, highlight_cmd, highlight_opt)
+ CheckRunVimInTerminal
+ CheckUnix
+
+ let lines = [
+ \ 'call setline(1, range(20))',
+ \ 'func OpenTerm()',
+ \ " let s:buf = term_start('cat', #{hidden: 1, "
+ \ .. a:highlight_opt .. "})",
+ \ ' let g:winid = popup_create(s:buf, #{ border: []})',
+ \ 'endfunc',
+ \ a:highlight_cmd,
+ \ ]
+ call writefile(lines, 'XtermPopup')
+ let buf = RunVimInTerminal('-S XtermPopup', #{rows: 15})
+ call TermWait(buf, 100)
+ call term_sendkeys(buf, ":set noruler\<CR>")
+ call term_sendkeys(buf, ":call OpenTerm()\<CR>")
+ call TermWait(buf, 50)
+ call term_sendkeys(buf, "hello\<CR>")
+ call VerifyScreenDump(buf, 'Test_terminal_popup_' .. a:group_name, {})
+
+ call term_sendkeys(buf, "\<C-D>")
+ call TermWait(buf, 50)
+ call term_sendkeys(buf, ":q\<CR>")
+ call TermWait(buf, 50) " wait for terminal to vanish
+ call StopVimInTerminal(buf)
+ call delete('XtermPopup')
+endfunc
+
+func Test_terminal_in_popup_colored_Terminal()
+ call Terminal_in_popup_colored("Terminal", "highlight Terminal ctermfg=blue ctermbg=yellow", "")
+endfunc
+
+func Test_terminal_in_popup_colored_group()
+ call Terminal_in_popup_colored("MyTermCol", "highlight MyTermCol ctermfg=darkgreen ctermbg=lightblue", "term_highlight: 'MyTermCol',")
+endfunc
+
+func Test_double_popup_terminal()
+ let buf1 = term_start(&shell, #{hidden: 1})
+ let win1 = popup_create(buf1, {})
+ let buf2 = term_start(&shell, #{hidden: 1})
+ call assert_fails('call popup_create(buf2, {})', 'E861:')
+ call popup_close(win1)
+ exe buf1 .. 'bwipe!'
+ exe buf2 .. 'bwipe!'
+endfunc
+
+func Test_issue_5607()
+ let wincount = winnr('$')
+ exe 'terminal' &shell &shellcmdflag 'exit'
+ let job = term_getjob(bufnr())
+ call WaitForAssert({-> assert_equal("dead", job_status(job))})
+
+ let old_wincolor = &wincolor
+ try
+ set wincolor=
+ finally
+ let &wincolor = old_wincolor
+ bw!
+ endtry
+endfunc
+
+func Test_hidden_terminal()
+ let buf = term_start(&shell, #{hidden: 1})
+ call assert_equal('', bufname('^$'))
+ call StopShellInTerminal(buf)
+endfunc
+
+func Test_term_nasty_callback()
+ CheckExecutable sh
+
+ set hidden
+ let g:buf0 = term_start('sh', #{hidden: 1, term_finish: 'close'})
+ call popup_create(g:buf0, {})
+ call assert_fails("call term_start(['sh', '-c'], #{curwin: 1})", 'E863:')
+
+ call popup_clear(1)
+ set hidden&
+endfunc
+
+func Test_term_and_startinsert()
+ CheckRunVimInTerminal
+ CheckUnix
+
+ let lines =<< trim EOL
+ put='some text'
+ term
+ startinsert
+ EOL
+ call writefile(lines, 'XTest_startinsert')
+ let buf = RunVimInTerminal('-S XTest_startinsert', {})
+
+ call term_sendkeys(buf, "exit\r")
+ call WaitForAssert({-> assert_equal("some text", term_getline(buf, 1))})
+ call term_sendkeys(buf, "0l")
+ call term_sendkeys(buf, "A<\<Esc>")
+ call WaitForAssert({-> assert_equal("some text<", term_getline(buf, 1))})
+
+ call StopVimInTerminal(buf)
+ call delete('XTest_startinsert')
+endfunc
+
+" Test for passing invalid arguments to terminal functions
+func Test_term_func_invalid_arg()
+ call assert_fails('let b = term_getaltscreen([])', 'E745:')
+ call assert_fails('let a = term_getattr(1, [])', 'E730:')
+ call assert_fails('let c = term_getcursor([])', 'E745:')
+ call assert_fails('let l = term_getline([], 1)', 'E745:')
+ call assert_fails('let l = term_getscrolled([])', 'E745:')
+ call assert_fails('let s = term_getsize([])', 'E745:')
+ call assert_fails('let s = term_getstatus([])', 'E745:')
+ call assert_fails('let s = term_scrape([], 1)', 'E745:')
+ call assert_fails('call term_sendkeys([], "a")', 'E745:')
+ call assert_fails('call term_setapi([], "")', 'E745:')
+ call assert_fails('call term_setrestore([], "")', 'E745:')
+ call assert_fails('call term_setkill([], "")', 'E745:')
+ if has('gui') || has('termguicolors')
+ call assert_fails('let p = term_getansicolors([])', 'E745:')
+ call assert_fails('call term_setansicolors([], [])', 'E745:')
+ endif
+endfunc
+
+" Test for sending various special keycodes to a terminal
+func Test_term_keycode_translation()
+ CheckRunVimInTerminal
+
+ let buf = RunVimInTerminal('', {})
+ call term_sendkeys(buf, ":set nocompatible\<CR>")
+
+ let keys = ["\<F1>", "\<F2>", "\<F3>", "\<F4>", "\<F5>", "\<F6>", "\<F7>",
+ \ "\<F8>", "\<F9>", "\<F10>", "\<F11>", "\<F12>", "\<Home>",
+ \ "\<S-Home>", "\<C-Home>", "\<End>", "\<S-End>", "\<C-End>",
+ \ "\<Ins>", "\<Del>", "\<Left>", "\<S-Left>", "\<C-Left>", "\<Right>",
+ \ "\<S-Right>", "\<C-Right>", "\<Up>", "\<S-Up>", "\<Down>",
+ \ "\<S-Down>"]
+ let output = ['<F1>', '<F2>', '<F3>', '<F4>', '<F5>', '<F6>', '<F7>',
+ \ '<F8>', '<F9>', '<F10>', '<F11>', '<F12>', '<Home>', '<S-Home>',
+ \ '<C-Home>', '<End>', '<S-End>', '<C-End>', '<Insert>', '<Del>',
+ \ '<Left>', '<S-Left>', '<C-Left>', '<Right>', '<S-Right>',
+ \ '<C-Right>', '<Up>', '<S-Up>', '<Down>', '<S-Down>']
+
+ call term_sendkeys(buf, "i")
+ for i in range(len(keys))
+ call term_sendkeys(buf, "\<C-U>\<C-K>" .. keys[i])
+ call WaitForAssert({-> assert_equal(output[i], term_getline(buf, 1))})
+ endfor
+
+ let keypad_keys = ["\<k0>", "\<k1>", "\<k2>", "\<k3>", "\<k4>", "\<k5>",
+ \ "\<k6>", "\<k7>", "\<k8>", "\<k9>", "\<kPoint>", "\<kPlus>",
+ \ "\<kMinus>", "\<kMultiply>", "\<kDivide>"]
+ let keypad_output = ['0', '1', '2', '3', '4', '5',
+ \ '6', '7', '8', '9', '.', '+',
+ \ '-', '*', '/']
+ for i in range(len(keypad_keys))
+ " TODO: Mysteriously keypad 3 and 9 do not work on some systems.
+ if keypad_output[i] == '3' || keypad_output[i] == '9'
+ continue
+ endif
+ call term_sendkeys(buf, "\<C-U>" .. keypad_keys[i])
+ call WaitForAssert({-> assert_equal(keypad_output[i], term_getline(buf, 1))})
+ endfor
+
+ call feedkeys("\<C-U>\<kEnter>\<BS>one\<C-W>.two", 'xt')
+ call WaitForAssert({-> assert_equal('two', term_getline(buf, 1))})
+
+ call StopVimInTerminal(buf)
+endfunc
+
+" Test for using the mouse in a terminal
+func Test_term_mouse()
+ CheckNotGui
+ CheckRunVimInTerminal
+
+ let save_mouse = &mouse
+ let save_term = &term
+ let save_ttymouse = &ttymouse
+ let save_clipboard = &clipboard
+ set mouse=a term=xterm ttymouse=sgr mousetime=200 clipboard=
+
+ let lines =<< trim END
+ one two three four five
+ red green yellow red blue
+ vim emacs sublime nano
+ END
+ call writefile(lines, 'Xtest_mouse')
+
+ " Create a terminal window running Vim for the test with mouse enabled
+ let prev_win = win_getid()
+ let buf = RunVimInTerminal('Xtest_mouse -n', {})
+ call term_sendkeys(buf, ":set nocompatible\<CR>")
+ call term_sendkeys(buf, ":set mouse=a term=xterm ttymouse=sgr\<CR>")
+ call term_sendkeys(buf, ":set clipboard=\<CR>")
+ call term_sendkeys(buf, ":set mousemodel=extend\<CR>")
+ call term_wait(buf)
+ redraw!
+
+ " Use the mouse to enter the terminal window
+ call win_gotoid(prev_win)
+ call feedkeys(MouseLeftClickCode(1, 1), 'x')
+ call feedkeys(MouseLeftReleaseCode(1, 1), 'x')
+ call assert_equal(1, getwininfo(win_getid())[0].terminal)
+
+ " Test for <LeftMouse> click/release
+ call test_setmouse(2, 5)
+ call feedkeys("\<LeftMouse>\<LeftRelease>", 'xt')
+ call test_setmouse(3, 8)
+ call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>")
+ call term_wait(buf, 50)
+ call term_sendkeys(buf, ":call writefile([json_encode(getpos('.'))], 'Xbuf')\<CR>")
+ call term_wait(buf, 50)
+ let pos = json_decode(readfile('Xbuf')[0])
+ call assert_equal([3, 8], pos[1:2])
+
+ " Test for selecting text using mouse
+ call delete('Xbuf')
+ call test_setmouse(2, 11)
+ call term_sendkeys(buf, "\<LeftMouse>")
+ call test_setmouse(2, 16)
+ call term_sendkeys(buf, "\<LeftRelease>y")
+ call term_wait(buf, 50)
+ call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
+ call term_wait(buf, 50)
+ call assert_equal('yellow', readfile('Xbuf')[0])
+
+ " Test for selecting text using doubleclick
+ call delete('Xbuf')
+ call test_setmouse(1, 11)
+ call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>\<LeftMouse>")
+ call test_setmouse(1, 17)
+ call term_sendkeys(buf, "\<LeftRelease>y")
+ call term_wait(buf, 50)
+ call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
+ call term_wait(buf, 50)
+ call assert_equal('three four', readfile('Xbuf')[0])
+
+ " Test for selecting a line using triple click
+ call delete('Xbuf')
+ call test_setmouse(3, 2)
+ call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>y")
+ call term_wait(buf, 50)
+ call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
+ call term_wait(buf, 50)
+ call assert_equal("vim emacs sublime nano\n", readfile('Xbuf')[0])
+
+ " Test for selecting a block using qudraple click
+ call delete('Xbuf')
+ call test_setmouse(1, 11)
+ call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>\<LeftMouse>")
+ call test_setmouse(3, 13)
+ call term_sendkeys(buf, "\<LeftRelease>y")
+ call term_wait(buf, 50)
+ call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
+ call term_wait(buf, 50)
+ call assert_equal("ree\nyel\nsub", readfile('Xbuf')[0])
+
+ " Test for extending a selection using right click
+ call delete('Xbuf')
+ call test_setmouse(2, 9)
+ call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>")
+ call test_setmouse(2, 16)
+ call term_sendkeys(buf, "\<RightMouse>\<RightRelease>y")
+ call term_wait(buf, 50)
+ call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
+ call term_wait(buf, 50)
+ call assert_equal("n yellow", readfile('Xbuf')[0])
+
+ " Test for pasting text using middle click
+ call delete('Xbuf')
+ call term_sendkeys(buf, ":let @r='bright '\<CR>")
+ call test_setmouse(2, 22)
+ call term_sendkeys(buf, "\"r\<MiddleMouse>\<MiddleRelease>")
+ call term_wait(buf, 50)
+ call term_sendkeys(buf, ":call writefile([getline(2)], 'Xbuf')\<CR>")
+ call term_wait(buf, 50)
+ call assert_equal("red bright blue", readfile('Xbuf')[0][-15:])
+
+ " cleanup
+ call term_wait(buf)
+ call StopVimInTerminal(buf)
+ let &mouse = save_mouse
+ let &term = save_term
+ let &ttymouse = save_ttymouse
+ let &clipboard = save_clipboard
+ set mousetime&
+ call delete('Xtest_mouse')
+ call delete('Xbuf')
+endfunc
+
+" Test for modeless selection in a terminal
+func Test_term_modeless_selection()
+ CheckUnix
+ CheckNotGui
+ CheckRunVimInTerminal
+ CheckFeature clipboard_working
+
+ let save_mouse = &mouse
+ let save_term = &term
+ let save_ttymouse = &ttymouse
+ set mouse=a term=xterm ttymouse=sgr mousetime=200
+ set clipboard=autoselectml
+
+ let lines =<< trim END
+ one two three four five
+ red green yellow red blue
+ vim emacs sublime nano
+ END
+ call writefile(lines, 'Xtest_modeless')
+
+ " Create a terminal window running Vim for the test with mouse disabled
+ let prev_win = win_getid()
+ let buf = RunVimInTerminal('Xtest_modeless -n', {})
+ call term_sendkeys(buf, ":set nocompatible\<CR>")
+ call term_sendkeys(buf, ":set mouse=\<CR>")
+ call term_wait(buf)
+ redraw!
+
+ " Use the mouse to enter the terminal window
+ call win_gotoid(prev_win)
+ call feedkeys(MouseLeftClickCode(1, 1), 'x')
+ call feedkeys(MouseLeftReleaseCode(1, 1), 'x')
+ call term_wait(buf)
+ call assert_equal(1, getwininfo(win_getid())[0].terminal)
+
+ " Test for copying a modeless selection to clipboard
+ let @* = 'clean'
+ " communicating with X server may take a little time
+ sleep 100m
+ call feedkeys(MouseLeftClickCode(2, 3), 'x')
+ call feedkeys(MouseLeftDragCode(2, 11), 'x')
+ call feedkeys(MouseLeftReleaseCode(2, 11), 'x')
+ call assert_equal("d green y", @*)
+
+ " cleanup
+ call term_wait(buf)
+ call StopVimInTerminal(buf)
+ let &mouse = save_mouse
+ let &term = save_term
+ let &ttymouse = save_ttymouse
+ set mousetime& clipboard&
+ call delete('Xtest_modeless')
+ new | only!
+endfunc
+
+
+" vim: shiftwidth=2 sts=2 expandtab
diff --git a/src/version.c b/src/version.c
index 81cf2c0..06d1bed 100644
--- a/src/version.c
+++ b/src/version.c
@@ -755,6 +755,8 @@
static int included_patches[] =
{ /* Add new patch number below this line */
/**/
+ 1114,
+/**/
1113,
/**/
1112,