Bram Moolenaar | 3b30168 | 2018-09-22 21:37:39 +0200 | [diff] [blame] | 1 | " Test :suspend |
| 2 | |
| 3 | source shared.vim |
Bram Moolenaar | 7a39dd7 | 2019-06-23 00:50:15 +0200 | [diff] [blame] | 4 | source term_util.vim |
Bram Moolenaar | 3b30168 | 2018-09-22 21:37:39 +0200 | [diff] [blame] | 5 | |
Bram Moolenaar | a8356bc | 2019-04-14 14:31:11 +0200 | [diff] [blame] | 6 | func CheckSuspended(buf, fileExists) |
| 7 | call WaitForAssert({-> assert_match('[$#] $', term_getline(a:buf, '.'))}) |
| 8 | |
| 9 | if a:fileExists |
| 10 | call assert_equal(['foo'], readfile('Xfoo')) |
| 11 | else |
| 12 | " Without 'autowrite', buffer should not be written. |
| 13 | call assert_equal(0, filereadable('Xfoo')) |
| 14 | endif |
| 15 | |
| 16 | call term_sendkeys(a:buf, "fg\<CR>\<C-L>") |
| 17 | call WaitForAssert({-> assert_equal(' 1 foo', term_getline(a:buf, '.'))}) |
| 18 | endfunc |
| 19 | |
Bram Moolenaar | 3b30168 | 2018-09-22 21:37:39 +0200 | [diff] [blame] | 20 | func Test_suspend() |
| 21 | if !has('terminal') || !executable('/bin/sh') |
| 22 | return |
| 23 | endif |
| 24 | |
| 25 | let buf = term_start('/bin/sh') |
| 26 | " Wait for shell prompt. |
Bram Moolenaar | 0f62cf5 | 2018-11-03 21:09:15 +0100 | [diff] [blame] | 27 | call WaitForAssert({-> assert_match('[$#] $', term_getline(buf, '.'))}) |
Bram Moolenaar | 3b30168 | 2018-09-22 21:37:39 +0200 | [diff] [blame] | 28 | |
Bram Moolenaar | 185d68a | 2019-08-15 11:21:15 +0200 | [diff] [blame] | 29 | call term_sendkeys(buf, v:progpath |
| 30 | \ . " --clean -X" |
Bram Moolenaar | 3b30168 | 2018-09-22 21:37:39 +0200 | [diff] [blame] | 31 | \ . " -c 'set nu'" |
| 32 | \ . " -c 'call setline(1, \"foo\")'" |
| 33 | \ . " Xfoo\<CR>") |
| 34 | " Cursor in terminal buffer should be on first line in spawned vim. |
| 35 | call WaitForAssert({-> assert_equal(' 1 foo', term_getline(buf, '.'))}) |
| 36 | |
| 37 | for suspend_cmd in [":suspend\<CR>", |
| 38 | \ ":stop\<CR>", |
| 39 | \ ":suspend!\<CR>", |
| 40 | \ ":stop!\<CR>", |
| 41 | \ "\<C-Z>"] |
| 42 | " Suspend and wait for shell prompt. |
| 43 | call term_sendkeys(buf, suspend_cmd) |
Bram Moolenaar | a8356bc | 2019-04-14 14:31:11 +0200 | [diff] [blame] | 44 | call CheckSuspended(buf, 0) |
Bram Moolenaar | 3b30168 | 2018-09-22 21:37:39 +0200 | [diff] [blame] | 45 | endfor |
| 46 | |
| 47 | " Test that :suspend! with 'autowrite' writes content of buffers if modified. |
| 48 | call term_sendkeys(buf, ":set autowrite\<CR>") |
| 49 | call assert_equal(0, filereadable('Xfoo')) |
| 50 | call term_sendkeys(buf, ":suspend\<CR>") |
| 51 | " Wait for shell prompt. |
Bram Moolenaar | a8356bc | 2019-04-14 14:31:11 +0200 | [diff] [blame] | 52 | call CheckSuspended(buf, 1) |
Bram Moolenaar | 3b30168 | 2018-09-22 21:37:39 +0200 | [diff] [blame] | 53 | |
Bram Moolenaar | 3020ccb | 2019-01-17 22:13:54 +0100 | [diff] [blame] | 54 | " Quit gracefully to dump coverage information. |
| 55 | call term_sendkeys(buf, ":qall!\<CR>") |
Bram Moolenaar | 6a2c5a7 | 2020-04-08 21:50:25 +0200 | [diff] [blame] | 56 | call TermWait(buf) |
Bram Moolenaar | 9992244 | 2019-07-08 20:58:25 +0200 | [diff] [blame] | 57 | " Wait until Vim actually exited and shell shows a prompt |
| 58 | call WaitForAssert({-> assert_match('[$#] $', term_getline(buf, '.'))}) |
Bram Moolenaar | 7a39dd7 | 2019-06-23 00:50:15 +0200 | [diff] [blame] | 59 | call StopShellInTerminal(buf) |
Bram Moolenaar | 3020ccb | 2019-01-17 22:13:54 +0100 | [diff] [blame] | 60 | |
Bram Moolenaar | 3b30168 | 2018-09-22 21:37:39 +0200 | [diff] [blame] | 61 | exe buf . 'bwipe!' |
| 62 | call delete('Xfoo') |
Bram Moolenaar | 3b30168 | 2018-09-22 21:37:39 +0200 | [diff] [blame] | 63 | endfunc |