vim: src/testdir/test_terminal3.vim annotate

annotate src/testdir/test_terminal3.vim @ 21524:8c6433359913 v8.2.1312

patch 8.2.1312: MS-Windows: terminal test may fail if dir.exe exists Commit: https://github.com/vim/vim/commit/066b12e36c32a87725303c0f71e968eb3f9a9f32 Author: Bram Moolenaar <Bram@vim.org> Date: Tue Jul 28 21:40:27 2020 +0200 patch 8.2.1312: MS-Windows: terminal test may fail if dir.exe exists Problem: MS-Windows: terminal test may fail if dir.exe exists. Solution: Use dir.com. (Ken Takata, closes https://github.com/vim/vim/issues/6557)

author	Bram Moolenaar <Bram@vim.org>
date	Tue, 28 Jul 2020 21:45:04 +0200
parents	299cf1c2a37d
children	08940efa6b4e

rev	line source
21253 ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 " Tests for the terminal window.
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	2 " This is split in two, because it can take a lot of time.
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	3 " See test_terminal.vim and test_terminal2.vim for further tests.
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	4
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	5 source check.vim
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 CheckFeature terminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	7
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	8 source shared.vim
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	9 source screendump.vim
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	10 source mouse.vim
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	11 source term_util.vim
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	12
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	13 let $PROMPT_COMMAND=''
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	14
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	15 func Test_terminal_altscreen()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	16 " somehow doesn't work on MS-Windows
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	17 CheckUnix
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	18 let cmd = "cat Xtext\<CR>"
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	19
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	20 let buf = term_start(&shell, {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	21 call writefile(["\<Esc>[?1047h"], 'Xtext')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	22 call term_sendkeys(buf, cmd)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	23 call WaitForAssert({-> assert_equal(1, term_getaltscreen(buf))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	24
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	25 call writefile(["\<Esc>[?1047l"], 'Xtext')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	26 call term_sendkeys(buf, cmd)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	27 call WaitForAssert({-> assert_equal(0, term_getaltscreen(buf))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	28
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	29 call term_sendkeys(buf, "exit\r")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	30 exe buf . "bwipe!"
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	31 call delete('Xtext')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	32 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	33
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	34 func Test_terminal_shell_option()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	35 if has('unix')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	36 " exec is a shell builtin command, should fail without a shell.
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	37 term exec ls runtest.vim
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	38 call WaitForAssert({-> assert_match('job failed', term_getline(bufnr(), 1))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	39 bwipe!
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	40
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	41 term ++shell exec ls runtest.vim
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	42 call WaitForAssert({-> assert_match('runtest.vim', term_getline(bufnr(), 1))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	43 bwipe!
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	44 elseif has('win32')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	45 " dir is a shell builtin command, should fail without a shell.
21524 8c6433359913 patch 8.2.1312: MS-Windows: terminal test may fail if dir.exe exists Bram Moolenaar <Bram@vim.org> parents: 21427 diff changeset	46 " However, if dir.exe (which might be provided by Cygwin/MSYS2) exists in
8c6433359913 patch 8.2.1312: MS-Windows: terminal test may fail if dir.exe exists Bram Moolenaar <Bram@vim.org> parents: 21427 diff changeset	47 " the %PATH%, "term dir" succeeds unintentionally. Use dir.com instead.
21253 ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	48 try
21524 8c6433359913 patch 8.2.1312: MS-Windows: terminal test may fail if dir.exe exists Bram Moolenaar <Bram@vim.org> parents: 21427 diff changeset	49 term dir.com /b runtest.vim
8c6433359913 patch 8.2.1312: MS-Windows: terminal test may fail if dir.exe exists Bram Moolenaar <Bram@vim.org> parents: 21427 diff changeset	50 call WaitForAssert({-> assert_match('job failed', term_getline(bufnr(), 1))})
21253 ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	51 catch /CreateProcess/
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	52 " ignore
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	53 endtry
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	54 bwipe!
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	55
21524 8c6433359913 patch 8.2.1312: MS-Windows: terminal test may fail if dir.exe exists Bram Moolenaar <Bram@vim.org> parents: 21427 diff changeset	56 " This should execute the dir builtin command even with ".com".
8c6433359913 patch 8.2.1312: MS-Windows: terminal test may fail if dir.exe exists Bram Moolenaar <Bram@vim.org> parents: 21427 diff changeset	57 term ++shell dir.com /b runtest.vim
21253 ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	58 call WaitForAssert({-> assert_match('runtest.vim', term_getline(bufnr(), 1))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	59 bwipe!
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	60 endif
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	61 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	62
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	63 func Test_terminal_invalid_arg()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	64 call assert_fails('terminal ++xyz', 'E181:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	65 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	66
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	67 func Test_terminal_in_popup()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	68 CheckRunVimInTerminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	69
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	70 let text =<< trim END
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	71 some text
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	72 to edit
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	73 in a popup window
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	74 END
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	75 call writefile(text, 'Xtext')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	76 let cmd = GetVimCommandCleanTerm()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	77 let lines = [
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	78 \ 'call setline(1, range(20))',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	79 \ 'hi PopTerm ctermbg=grey',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	80 \ 'func OpenTerm(setColor)',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	81 \ " set noruler",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	82 \ " let s:buf = term_start('" .. cmd .. " Xtext', #{hidden: 1, term_finish: 'close'})",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	83 \ ' let g:winid = popup_create(s:buf, #{minwidth: 45, minheight: 7, border: [], drag: 1, resize: 1})',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	84 \ ' if a:setColor',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	85 \ ' call win_execute(g:winid, "set wincolor=PopTerm")',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	86 \ ' endif',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	87 \ 'endfunc',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	88 \ 'func HidePopup()',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	89 \ ' call popup_hide(g:winid)',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	90 \ 'endfunc',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	91 \ 'func ClosePopup()',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	92 \ ' call popup_close(g:winid)',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	93 \ 'endfunc',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	94 \ 'func ReopenPopup()',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	95 \ ' call popup_create(s:buf, #{minwidth: 40, minheight: 6, border: []})',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	96 \ 'endfunc',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	97 \ ]
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	98 call writefile(lines, 'XtermPopup')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	99 let buf = RunVimInTerminal('-S XtermPopup', #{rows: 15})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	100 call TermWait(buf, 100)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	101 call term_sendkeys(buf, ":call OpenTerm(0)\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	102 call TermWait(buf, 100)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	103 call term_sendkeys(buf, ":\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	104 call TermWait(buf, 100)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	105 call term_sendkeys(buf, "\<C-W>:echo getwinvar(g:winid, \"&buftype\") win_gettype(g:winid)\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	106 call VerifyScreenDump(buf, 'Test_terminal_popup_1', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	107
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	108 call term_sendkeys(buf, ":q\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	109 call VerifyScreenDump(buf, 'Test_terminal_popup_2', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	110
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	111 call term_sendkeys(buf, ":call OpenTerm(1)\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	112 call TermWait(buf, 150)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	113 call term_sendkeys(buf, ":set hlsearch\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	114 call TermWait(buf, 100)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	115 call term_sendkeys(buf, "/edit\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	116 call VerifyScreenDump(buf, 'Test_terminal_popup_3', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	117
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	118 call term_sendkeys(buf, "\<C-W>:call HidePopup()\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	119 call VerifyScreenDump(buf, 'Test_terminal_popup_4', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	120 call term_sendkeys(buf, "\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	121 call TermWait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	122
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	123 call term_sendkeys(buf, "\<C-W>:call ClosePopup()\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	124 call VerifyScreenDump(buf, 'Test_terminal_popup_5', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	125
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	126 call term_sendkeys(buf, "\<C-W>:call ReopenPopup()\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	127 call VerifyScreenDump(buf, 'Test_terminal_popup_6', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	128
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	129 " Go to terminal-Normal mode and visually select text.
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	130 call term_sendkeys(buf, "\<C-W>Ngg/in\<CR>vww")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	131 call VerifyScreenDump(buf, 'Test_terminal_popup_7', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	132
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	133 " Back to job mode, redraws
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	134 call term_sendkeys(buf, "A")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	135 call VerifyScreenDump(buf, 'Test_terminal_popup_8', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	136
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	137 call TermWait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	138 call term_sendkeys(buf, ":q\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	139 call TermWait(buf, 150) " wait for terminal to vanish
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	140
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	141 call StopVimInTerminal(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	142 call delete('Xtext')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	143 call delete('XtermPopup')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	144 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	145
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	146 " Check a terminal in popup window uses the default mininum size.
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	147 func Test_terminal_in_popup_min_size()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	148 CheckRunVimInTerminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	149
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	150 let text =<< trim END
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	151 another text
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	152 to show
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	153 in a popup window
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	154 END
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	155 call writefile(text, 'Xtext')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	156 let lines = [
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	157 \ 'call setline(1, range(20))',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	158 \ 'func OpenTerm()',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	159 \ " let s:buf = term_start('cat Xtext', #{hidden: 1})",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	160 \ ' let g:winid = popup_create(s:buf, #{ border: []})',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	161 \ 'endfunc',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	162 \ ]
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	163 call writefile(lines, 'XtermPopup')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	164 let buf = RunVimInTerminal('-S XtermPopup', #{rows: 15})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	165 call TermWait(buf, 100)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	166 call term_sendkeys(buf, ":set noruler\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	167 call term_sendkeys(buf, ":call OpenTerm()\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	168 call TermWait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	169 call term_sendkeys(buf, ":\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	170 call VerifyScreenDump(buf, 'Test_terminal_popup_m1', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	171
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	172 call TermWait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	173 call term_sendkeys(buf, ":q\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	174 call TermWait(buf, 50) " wait for terminal to vanish
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	175 call StopVimInTerminal(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	176 call delete('Xtext')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	177 call delete('XtermPopup')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	178 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	179
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	180 " Check a terminal in popup window with different colors
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	181 func Terminal_in_popup_colored(group_name, highlight_cmd, highlight_opt)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	182 CheckRunVimInTerminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	183 CheckUnix
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	184
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	185 let lines = [
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	186 \ 'call setline(1, range(20))',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	187 \ 'func OpenTerm()',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	188 \ " let s:buf = term_start('cat', #{hidden: 1, "
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	189 \ .. a:highlight_opt .. "})",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	190 \ ' let g:winid = popup_create(s:buf, #{ border: []})',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	191 \ 'endfunc',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	192 \ a:highlight_cmd,
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	193 \ ]
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	194 call writefile(lines, 'XtermPopup')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	195 let buf = RunVimInTerminal('-S XtermPopup', #{rows: 15})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	196 call TermWait(buf, 100)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	197 call term_sendkeys(buf, ":set noruler\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	198 call term_sendkeys(buf, ":call OpenTerm()\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	199 call TermWait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	200 call term_sendkeys(buf, "hello\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	201 call VerifyScreenDump(buf, 'Test_terminal_popup_' .. a:group_name, {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	202
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	203 call term_sendkeys(buf, "\<C-D>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	204 call TermWait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	205 call term_sendkeys(buf, ":q\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	206 call TermWait(buf, 50) " wait for terminal to vanish
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	207 call StopVimInTerminal(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	208 call delete('XtermPopup')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	209 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	210
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	211 func Test_terminal_in_popup_colored_Terminal()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	212 call Terminal_in_popup_colored("Terminal", "highlight Terminal ctermfg=blue ctermbg=yellow", "")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	213 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	214
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	215 func Test_terminal_in_popup_colored_group()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	216 call Terminal_in_popup_colored("MyTermCol", "highlight MyTermCol ctermfg=darkgreen ctermbg=lightblue", "term_highlight: 'MyTermCol',")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	217 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	218
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	219 func Test_double_popup_terminal()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	220 let buf1 = term_start(&shell, #{hidden: 1})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	221 let win1 = popup_create(buf1, {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	222 let buf2 = term_start(&shell, #{hidden: 1})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	223 call assert_fails('call popup_create(buf2, {})', 'E861:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	224 call popup_close(win1)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	225 exe buf1 .. 'bwipe!'
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	226 exe buf2 .. 'bwipe!'
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	227 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	228
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	229 func Test_issue_5607()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	230 let wincount = winnr('$')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	231 exe 'terminal' &shell &shellcmdflag 'exit'
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	232 let job = term_getjob(bufnr())
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	233 call WaitForAssert({-> assert_equal("dead", job_status(job))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	234
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	235 let old_wincolor = &wincolor
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	236 try
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	237 set wincolor=
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	238 finally
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	239 let &wincolor = old_wincolor
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	240 bw!
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	241 endtry
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	242 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	243
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	244 func Test_hidden_terminal()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	245 let buf = term_start(&shell, #{hidden: 1})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	246 call assert_equal('', bufname('^$'))
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	247 call StopShellInTerminal(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	248 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	249
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	250 func Test_term_nasty_callback()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	251 CheckExecutable sh
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	252
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	253 set hidden
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	254 let g:buf0 = term_start('sh', #{hidden: 1, term_finish: 'close'})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	255 call popup_create(g:buf0, {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	256 call assert_fails("call term_start(['sh', '-c'], #{curwin: 1})", 'E863:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	257
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	258 call popup_clear(1)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	259 set hidden&
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	260 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	261
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	262 func Test_term_and_startinsert()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	263 CheckRunVimInTerminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	264 CheckUnix
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	265
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	266 let lines =<< trim EOL
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	267 put='some text'
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	268 term
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	269 startinsert
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	270 EOL
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	271 call writefile(lines, 'XTest_startinsert')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	272 let buf = RunVimInTerminal('-S XTest_startinsert', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	273
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	274 call term_sendkeys(buf, "exit\r")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	275 call WaitForAssert({-> assert_equal("some text", term_getline(buf, 1))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	276 call term_sendkeys(buf, "0l")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	277 call term_sendkeys(buf, "A<\<Esc>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	278 call WaitForAssert({-> assert_equal("some text<", term_getline(buf, 1))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	279
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	280 call StopVimInTerminal(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	281 call delete('XTest_startinsert')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	282 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	283
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	284 " Test for passing invalid arguments to terminal functions
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	285 func Test_term_func_invalid_arg()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	286 call assert_fails('let b = term_getaltscreen([])', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	287 call assert_fails('let a = term_getattr(1, [])', 'E730:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	288 call assert_fails('let c = term_getcursor([])', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	289 call assert_fails('let l = term_getline([], 1)', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	290 call assert_fails('let l = term_getscrolled([])', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	291 call assert_fails('let s = term_getsize([])', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	292 call assert_fails('let s = term_getstatus([])', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	293 call assert_fails('let s = term_scrape([], 1)', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	294 call assert_fails('call term_sendkeys([], "a")', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	295 call assert_fails('call term_setapi([], "")', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	296 call assert_fails('call term_setrestore([], "")', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	297 call assert_fails('call term_setkill([], "")', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	298 if has('gui') \|\| has('termguicolors')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	299 call assert_fails('let p = term_getansicolors([])', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	300 call assert_fails('call term_setansicolors([], [])', 'E745:')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	301 endif
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	302 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	303
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	304 " Test for sending various special keycodes to a terminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	305 func Test_term_keycode_translation()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	306 CheckRunVimInTerminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	307
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	308 let buf = RunVimInTerminal('', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	309 call term_sendkeys(buf, ":set nocompatible\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	310
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	311 let keys = ["\<F1>", "\<F2>", "\<F3>", "\<F4>", "\<F5>", "\<F6>", "\<F7>",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	312 \ "\<F8>", "\<F9>", "\<F10>", "\<F11>", "\<F12>", "\<Home>",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	313 \ "\<S-Home>", "\<C-Home>", "\<End>", "\<S-End>", "\<C-End>",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	314 \ "\<Ins>", "\<Del>", "\<Left>", "\<S-Left>", "\<C-Left>", "\<Right>",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	315 \ "\<S-Right>", "\<C-Right>", "\<Up>", "\<S-Up>", "\<Down>",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	316 \ "\<S-Down>"]
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	317 let output = ['<F1>', '<F2>', '<F3>', '<F4>', '<F5>', '<F6>', '<F7>',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	318 \ '<F8>', '<F9>', '<F10>', '<F11>', '<F12>', '<Home>', '<S-Home>',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	319 \ '<C-Home>', '<End>', '<S-End>', '<C-End>', '<Insert>', '<Del>',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	320 \ '<Left>', '<S-Left>', '<C-Left>', '<Right>', '<S-Right>',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	321 \ '<C-Right>', '<Up>', '<S-Up>', '<Down>', '<S-Down>']
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	322
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	323 call term_sendkeys(buf, "i")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	324 for i in range(len(keys))
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	325 call term_sendkeys(buf, "\<C-U>\<C-K>" .. keys[i])
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	326 call WaitForAssert({-> assert_equal(output[i], term_getline(buf, 1))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	327 endfor
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	328
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	329 let keypad_keys = ["\<k0>", "\<k1>", "\<k2>", "\<k3>", "\<k4>", "\<k5>",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	330 \ "\<k6>", "\<k7>", "\<k8>", "\<k9>", "\<kPoint>", "\<kPlus>",
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	331 \ "\<kMinus>", "\<kMultiply>", "\<kDivide>"]
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	332 let keypad_output = ['0', '1', '2', '3', '4', '5',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	333 \ '6', '7', '8', '9', '.', '+',
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	334 \ '-', '*', '/']
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	335 for i in range(len(keypad_keys))
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	336 " TODO: Mysteriously keypad 3 and 9 do not work on some systems.
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	337 if keypad_output[i] == '3' \|\| keypad_output[i] == '9'
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	338 continue
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	339 endif
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	340 call term_sendkeys(buf, "\<C-U>" .. keypad_keys[i])
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	341 call WaitForAssert({-> assert_equal(keypad_output[i], term_getline(buf, 1))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	342 endfor
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	343
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	344 call feedkeys("\<C-U>\<kEnter>\<BS>one\<C-W>.two", 'xt')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	345 call WaitForAssert({-> assert_equal('two', term_getline(buf, 1))})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	346
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	347 call StopVimInTerminal(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	348 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	349
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	350 " Test for using the mouse in a terminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	351 func Test_term_mouse()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	352 CheckNotGui
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	353 CheckRunVimInTerminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	354
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	355 let save_mouse = &mouse
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	356 let save_term = &term
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	357 let save_ttymouse = &ttymouse
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	358 let save_clipboard = &clipboard
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	359 set mouse=a term=xterm ttymouse=sgr mousetime=200 clipboard=
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	360
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	361 let lines =<< trim END
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	362 one two three four five
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	363 red green yellow red blue
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	364 vim emacs sublime nano
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	365 END
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	366 call writefile(lines, 'Xtest_mouse')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	367
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	368 " Create a terminal window running Vim for the test with mouse enabled
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	369 let prev_win = win_getid()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	370 let buf = RunVimInTerminal('Xtest_mouse -n', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	371 call term_sendkeys(buf, ":set nocompatible\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	372 call term_sendkeys(buf, ":set mouse=a term=xterm ttymouse=sgr\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	373 call term_sendkeys(buf, ":set clipboard=\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	374 call term_sendkeys(buf, ":set mousemodel=extend\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	375 call term_wait(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	376 redraw!
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	377
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	378 " Use the mouse to enter the terminal window
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	379 call win_gotoid(prev_win)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	380 call feedkeys(MouseLeftClickCode(1, 1), 'x')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	381 call feedkeys(MouseLeftReleaseCode(1, 1), 'x')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	382 call assert_equal(1, getwininfo(win_getid())[0].terminal)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	383
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	384 " Test for <LeftMouse> click/release
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	385 call test_setmouse(2, 5)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	386 call feedkeys("\<LeftMouse>\<LeftRelease>", 'xt')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	387 call test_setmouse(3, 8)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	388 call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	389 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	390 call term_sendkeys(buf, ":call writefile([json_encode(getpos('.'))], 'Xbuf')\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	391 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	392 let pos = json_decode(readfile('Xbuf')[0])
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	393 call assert_equal([3, 8], pos[1:2])
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	394
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	395 " Test for selecting text using mouse
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	396 call delete('Xbuf')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	397 call test_setmouse(2, 11)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	398 call term_sendkeys(buf, "\<LeftMouse>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	399 call test_setmouse(2, 16)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	400 call term_sendkeys(buf, "\<LeftRelease>y")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	401 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	402 call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	403 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	404 call assert_equal('yellow', readfile('Xbuf')[0])
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	405
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	406 " Test for selecting text using doubleclick
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	407 call delete('Xbuf')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	408 call test_setmouse(1, 11)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	409 call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>\<LeftMouse>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	410 call test_setmouse(1, 17)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	411 call term_sendkeys(buf, "\<LeftRelease>y")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	412 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	413 call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	414 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	415 call assert_equal('three four', readfile('Xbuf')[0])
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	416
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	417 " Test for selecting a line using triple click
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	418 call delete('Xbuf')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	419 call test_setmouse(3, 2)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	420 call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>y")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	421 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	422 call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	423 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	424 call assert_equal("vim emacs sublime nano\n", readfile('Xbuf')[0])
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	425
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	426 " Test for selecting a block using qudraple click
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	427 call delete('Xbuf')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	428 call test_setmouse(1, 11)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	429 call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>\<LeftMouse>\<LeftRelease>\<LeftMouse>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	430 call test_setmouse(3, 13)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	431 call term_sendkeys(buf, "\<LeftRelease>y")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	432 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	433 call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	434 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	435 call assert_equal("ree\nyel\nsub", readfile('Xbuf')[0])
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	436
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	437 " Test for extending a selection using right click
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	438 call delete('Xbuf')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	439 call test_setmouse(2, 9)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	440 call term_sendkeys(buf, "\<LeftMouse>\<LeftRelease>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	441 call test_setmouse(2, 16)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	442 call term_sendkeys(buf, "\<RightMouse>\<RightRelease>y")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	443 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	444 call term_sendkeys(buf, ":call writefile([@\"], 'Xbuf')\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	445 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	446 call assert_equal("n yellow", readfile('Xbuf')[0])
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	447
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	448 " Test for pasting text using middle click
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	449 call delete('Xbuf')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	450 call term_sendkeys(buf, ":let @r='bright '\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	451 call test_setmouse(2, 22)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	452 call term_sendkeys(buf, "\"r\<MiddleMouse>\<MiddleRelease>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	453 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	454 call term_sendkeys(buf, ":call writefile([getline(2)], 'Xbuf')\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	455 call term_wait(buf, 50)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	456 call assert_equal("red bright blue", readfile('Xbuf')[0][-15:])
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	457
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	458 " cleanup
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	459 call term_wait(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	460 call StopVimInTerminal(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	461 let &mouse = save_mouse
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	462 let &term = save_term
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	463 let &ttymouse = save_ttymouse
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	464 let &clipboard = save_clipboard
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	465 set mousetime&
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	466 call delete('Xtest_mouse')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	467 call delete('Xbuf')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	468 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	469
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	470 " Test for modeless selection in a terminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	471 func Test_term_modeless_selection()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	472 CheckUnix
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	473 CheckNotGui
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	474 CheckRunVimInTerminal
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	475 CheckFeature clipboard_working
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	476
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	477 let save_mouse = &mouse
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	478 let save_term = &term
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	479 let save_ttymouse = &ttymouse
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	480 set mouse=a term=xterm ttymouse=sgr mousetime=200
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	481 set clipboard=autoselectml
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	482
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	483 let lines =<< trim END
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	484 one two three four five
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	485 red green yellow red blue
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	486 vim emacs sublime nano
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	487 END
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	488 call writefile(lines, 'Xtest_modeless')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	489
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	490 " Create a terminal window running Vim for the test with mouse disabled
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	491 let prev_win = win_getid()
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	492 let buf = RunVimInTerminal('Xtest_modeless -n', {})
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	493 call term_sendkeys(buf, ":set nocompatible\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	494 call term_sendkeys(buf, ":set mouse=\<CR>")
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	495 call term_wait(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	496 redraw!
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	497
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	498 " Use the mouse to enter the terminal window
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	499 call win_gotoid(prev_win)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	500 call feedkeys(MouseLeftClickCode(1, 1), 'x')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	501 call feedkeys(MouseLeftReleaseCode(1, 1), 'x')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	502 call term_wait(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	503 call assert_equal(1, getwininfo(win_getid())[0].terminal)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	504
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	505 " Test for copying a modeless selection to clipboard
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	506 let @* = 'clean'
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	507 " communicating with X server may take a little time
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	508 sleep 100m
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	509 call feedkeys(MouseLeftClickCode(2, 3), 'x')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	510 call feedkeys(MouseLeftDragCode(2, 11), 'x')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	511 call feedkeys(MouseLeftReleaseCode(2, 11), 'x')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	512 call assert_equal("d green y", @*)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	513
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	514 " cleanup
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	515 call term_wait(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	516 call StopVimInTerminal(buf)
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	517 let &mouse = save_mouse
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	518 let &term = save_term
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	519 let &ttymouse = save_ttymouse
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	520 set mousetime& clipboard&
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	521 call delete('Xtest_modeless')
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	522 new \| only!
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	523 endfunc
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	524
21295 3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	525 func Test_terminal_getwinpos()
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	526 CheckRunVimInTerminal
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	527
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	528 " split, go to the bottom-right window
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	529 split
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	530 wincmd j
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	531 set splitright
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	532
21427 299cf1c2a37d patch 8.2.1264: terminal getwinpos() test is a bit flaky Bram Moolenaar <Bram@vim.org> parents: 21295 diff changeset	533 let buf = RunVimInTerminal('', {'cols': 60})
299cf1c2a37d patch 8.2.1264: terminal getwinpos() test is a bit flaky Bram Moolenaar <Bram@vim.org> parents: 21295 diff changeset	534 call TermWait(buf, 100)
299cf1c2a37d patch 8.2.1264: terminal getwinpos() test is a bit flaky Bram Moolenaar <Bram@vim.org> parents: 21295 diff changeset	535 call term_sendkeys(buf, ":echo getwinpos(500)\<CR>")
21295 3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	536
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	537 " Find the output of getwinpos() in the bottom line.
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	538 let rows = term_getsize(buf)[0]
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	539 call WaitForAssert({-> assert_match('\[\d\+, \d\+\]', term_getline(buf, rows))})
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	540 let line = term_getline(buf, rows)
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	541 let xpos = str2nr(substitute(line, '\[$\d\+$, \d\+\]', '\1', ''))
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	542 let ypos = str2nr(substitute(line, '\[\d\+, $\d\+$\]', '\1', ''))
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	543
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	544 " Position must be bigger than the getwinpos() result of Vim itself.
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	545 " The calculation in the console assumes a 10 x 7 character cell.
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	546 " In the GUI it can be more, let's assume a 20 x 14 cell.
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	547 " And then add 100 / 200 tolerance.
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	548 let [xroot, yroot] = getwinpos()
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	549 let winpos = 50->getwinpos()
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	550 call assert_equal(xroot, winpos[0])
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	551 call assert_equal(yroot, winpos[1])
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	552 let [winrow, wincol] = win_screenpos('.')
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	553 let xoff = wincol * (has('gui_running') ? 14 : 7) + 100
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	554 let yoff = winrow * (has('gui_running') ? 20 : 10) + 200
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	555 call assert_inrange(xroot + 2, xroot + xoff, xpos)
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	556 call assert_inrange(yroot + 2, yroot + yoff, ypos)
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	557
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	558 call TermWait(buf)
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	559 call term_sendkeys(buf, ":q\<CR>")
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	560 call StopVimInTerminal(buf)
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	561 exe buf . 'bwipe!'
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	562 set splitright&
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	563 only!
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	564 endfunc
3e0d4782d0c6 patch 8.2.1198: terminal2 test sometimes hangs in the GUI on Travis Bram Moolenaar <Bram@vim.org> parents: 21253 diff changeset	565
21253 ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	566
ffa6b82fa993 patch 8.2.1177: terminal2 test sometimes hangs in the GUI Bram Moolenaar <Bram@vim.org> parents: diff changeset	567 " vim: shiftwidth=2 sts=2 expandtab

Mercurial > vim

annotate src/testdir/test_terminal3.vim @ 21524:8c6433359913 v8.2.1312