vim: src/testdir/test_swap.vim annotate

annotate src/testdir/test_swap.vim @ 25384:e8e2c4d33b9b v8.2.3229

patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Commit: https://github.com/vim/vim/commit/4490ec4e839e45a2e6923c265c7e9e64c240b805 Author: Yegappan Lakshmanan <yegappan@yahoo.com> Date: Tue Jul 27 22:00:44 2021 +0200 patch 8.2.3229: Vim9: runtime and compile time type checks are not the same Problem: Vim9: runtime and compile time type checks are not the same. Solution: Add more runtime type checks for builtin functions. (Yegappan Lakshmanan, closes #8646)

author	Bram Moolenaar <Bram@vim.org>
date	Tue, 27 Jul 2021 22:15:06 +0200
parents	da0e5ff44b14
children	c2d4e40a32a6

rev	line source
12750 0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: diff changeset	1 " Tests for the swap feature
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: diff changeset	2
19776 42e4083429a7 patch 8.2.0444: swap file test fails on some systems Bram Moolenaar <Bram@vim.org> parents: 19487 diff changeset	3 source check.vim
18277 f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	4 source shared.vim
19487 0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	5 source term_util.vim
18277 f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	6
14778 20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	7 func s:swapname()
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	8 return trim(execute('swapname'))
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	9 endfunc
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	10
12777 3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	11 " Tests for 'directory' option.
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	12 func Test_swap_directory()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21337 diff changeset	13 CheckUnix
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21337 diff changeset	14
12777 3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	15 let content = ['start of testfile',
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	16 \ 'line 2 Abcdefghij',
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	17 \ 'line 3 Abcdefghij',
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	18 \ 'end of testfile']
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	19 call writefile(content, 'Xtest1')
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	20
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	21 " '.', swap file in the same directory as file
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	22 set dir=.,~
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	23
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	24 " Verify that the swap file doesn't exist in the current directory
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	25 call assert_equal([], glob(".Xtest1*.swp", 1, 1, 1))
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	26 edit Xtest1
14778 20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	27 let swfname = s:swapname()
12777 3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	28 call assert_equal([swfname], glob(swfname, 1, 1, 1))
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	29
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	30 " './dir', swap file in a directory relative to the file
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	31 set dir=./Xtest2,.,~
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	32
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	33 call mkdir("Xtest2")
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	34 edit Xtest1
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	35 call assert_equal([], glob(swfname, 1, 1, 1))
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	36 let swfname = "Xtest2/Xtest1.swp"
14778 20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	37 call assert_equal(swfname, s:swapname())
12777 3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	38 call assert_equal([swfname], glob("Xtest2/*", 1, 1, 1))
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	39
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	40 " 'dir', swap file in directory relative to the current dir
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	41 set dir=Xtest.je,~
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	42
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	43 call mkdir("Xtest.je")
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	44 call writefile(content, 'Xtest2/Xtest3')
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	45 edit Xtest2/Xtest3
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	46 call assert_equal(["Xtest2/Xtest3"], glob("Xtest2/*", 1, 1, 1))
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	47 let swfname = "Xtest.je/Xtest3.swp"
14778 20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	48 call assert_equal(swfname, s:swapname())
12777 3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	49 call assert_equal([swfname], glob("Xtest.je/*", 1, 1, 1))
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	50
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	51 set dir&
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	52 call delete("Xtest1")
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	53 call delete("Xtest2", "rf")
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	54 call delete("Xtest.je", "rf")
3272e1cde1eb patch 8.0.1266: Test_swap_directory was commented out Christian Brabandt <cb@256bit.org> parents: 12775 diff changeset	55 endfunc
12771 8984342ab09e patch 8.0.1263: others can read the swap file if a user is careless Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	56
8984342ab09e patch 8.0.1263: others can read the swap file if a user is careless Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	57 func Test_swap_group()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21337 diff changeset	58 CheckUnix
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21337 diff changeset	59
12771 8984342ab09e patch 8.0.1263: others can read the swap file if a user is careless Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	60 let groups = split(system('groups'))
8984342ab09e patch 8.0.1263: others can read the swap file if a user is careless Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	61 if len(groups) <= 1
12775 bda267b9fc68 patch 8.0.1265: swap test not skipped when there is one group Christian Brabandt <cb@256bit.org> parents: 12771 diff changeset	62 throw 'Skipped: need at least two groups, got ' . string(groups)
12771 8984342ab09e patch 8.0.1263: others can read the swap file if a user is careless Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	63 endif
12750 0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: diff changeset	64
12779 73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	65 try
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	66 call delete('Xtest')
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	67 split Xtest
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	68 call setline(1, 'just some text')
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	69 wq
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	70 if system('ls -l Xtest') !~ ' ' . groups[0] . ' \d'
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	71 throw 'Skipped: test file does not have the first group'
12771 8984342ab09e patch 8.0.1263: others can read the swap file if a user is careless Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	72 else
12779 73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	73 silent !chmod 640 Xtest
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	74 call system('chgrp ' . groups[1] . ' Xtest')
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	75 if system('ls -l Xtest') !~ ' ' . groups[1] . ' \d'
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	76 throw 'Skipped: cannot set second group on test file'
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	77 else
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	78 split Xtest
14778 20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	79 let swapname = s:swapname()
12779 73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	80 call assert_match('Xtest', swapname)
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	81 " Group of swapfile must now match original file.
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	82 call assert_match(' ' . groups[1] . ' \d', system('ls -l ' . swapname))
12750 0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: diff changeset	83
12779 73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	84 bwipe!
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	85 endif
12771 8984342ab09e patch 8.0.1263: others can read the swap file if a user is careless Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	86 endif
12779 73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	87 finally
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	88 call delete('Xtest')
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind Christian Brabandt <cb@256bit.org> parents: 12777 diff changeset	89 endtry
12750 0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: diff changeset	90 endfunc
13896 4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	91
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	92 func Test_missing_dir()
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	93 call mkdir('Xswapdir')
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	94 exe 'set directory=' . getcwd() . '/Xswapdir'
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	95
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	96 call assert_equal('', glob('foo'))
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	97 call assert_equal('', glob('bar'))
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	98 edit foo/x.txt
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	99 " This should not give a warning for an existing swap file.
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	100 split bar/x.txt
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	101 only
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	102
15645 f315ab10d579 patch 8.1.0830: test leaves directory behind on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 14778 diff changeset	103 " Delete the buffer so that swap file is removed before we try to delete the
f315ab10d579 patch 8.1.0830: test leaves directory behind on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 14778 diff changeset	104 " directory. That fails on MS-Windows.
f315ab10d579 patch 8.1.0830: test leaves directory behind on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 14778 diff changeset	105 %bdelete!
13896 4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	106 set directory&
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	107 call delete('Xswapdir', 'rf')
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory Christian Brabandt <cb@256bit.org> parents: 12779 diff changeset	108 endfunc
14599 72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	109
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	110 func Test_swapinfo()
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	111 new Xswapinfo
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	112 call setline(1, ['one', 'two', 'three'])
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	113 w
14778 20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	114 let fname = s:swapname()
14599 72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	115 call assert_match('Xswapinfo', fname)
18017 988e5a868b60 patch 8.1.2004: more functions can be used as methods Bram Moolenaar <Bram@vim.org> parents: 16738 diff changeset	116 let info = fname->swapinfo()
14605 0c47880f3d95 patch 8.1.0316: swapinfo() test fails on Travis Christian Brabandt <cb@256bit.org> parents: 14601 diff changeset	117
0c47880f3d95 patch 8.1.0316: swapinfo() test fails on Travis Christian Brabandt <cb@256bit.org> parents: 14601 diff changeset	118 let ver = printf('VIM %d.%d', v:version / 100, v:version % 100)
0c47880f3d95 patch 8.1.0316: swapinfo() test fails on Travis Christian Brabandt <cb@256bit.org> parents: 14601 diff changeset	119 call assert_equal(ver, info.version)
0c47880f3d95 patch 8.1.0316: swapinfo() test fails on Travis Christian Brabandt <cb@256bit.org> parents: 14601 diff changeset	120
14599 72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	121 call assert_match('\w', info.user)
14605 0c47880f3d95 patch 8.1.0316: swapinfo() test fails on Travis Christian Brabandt <cb@256bit.org> parents: 14601 diff changeset	122 " host name is truncated to 39 bytes in the swap file
0c47880f3d95 patch 8.1.0316: swapinfo() test fails on Travis Christian Brabandt <cb@256bit.org> parents: 14601 diff changeset	123 call assert_equal(hostname()[:38], info.host)
14599 72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	124 call assert_match('Xswapinfo', info.fname)
14601 d0ff19a55579 patch 8.1.0314: build failure without the +eval feature Christian Brabandt <cb@256bit.org> parents: 14599 diff changeset	125 call assert_match(0, info.dirty)
14599 72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	126 call assert_equal(getpid(), info.pid)
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	127 call assert_match('^\d*$', info.mtime)
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	128 if has_key(info, 'inode')
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	129 call assert_match('\d', info.inode)
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	130 endif
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	131 bwipe!
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	132 call delete(fname)
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	133 call delete('Xswapinfo')
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	134
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	135 let info = swapinfo('doesnotexist')
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	136 call assert_equal('Cannot open file', info.error)
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	137
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	138 call writefile(['burp'], 'Xnotaswapfile')
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	139 let info = swapinfo('Xnotaswapfile')
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	140 call assert_equal('Cannot read file', info.error)
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	141 call delete('Xnotaswapfile')
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	142
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	143 call writefile([repeat('x', 10000)], 'Xnotaswapfile')
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	144 let info = swapinfo('Xnotaswapfile')
14601 d0ff19a55579 patch 8.1.0314: build failure without the +eval feature Christian Brabandt <cb@256bit.org> parents: 14599 diff changeset	145 call assert_equal('Not a swap file', info.error)
14599 72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	146 call delete('Xnotaswapfile')
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable Christian Brabandt <cb@256bit.org> parents: 13896 diff changeset	147 endfunc
14778 20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	148
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	149 func Test_swapname()
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	150 edit Xtest1
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	151 let expected = s:swapname()
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	152 call assert_equal(expected, swapname('%'))
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	153
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	154 new Xtest2
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	155 let buf = bufnr('%')
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	156 let expected = s:swapname()
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	157 wincmd p
18017 988e5a868b60 patch 8.1.2004: more functions can be used as methods Bram Moolenaar <Bram@vim.org> parents: 16738 diff changeset	158 call assert_equal(expected, buf->swapname())
14778 20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	159
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	160 new Xtest3
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	161 setlocal noswapfile
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	162 call assert_equal('', swapname('%'))
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	163
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	164 bwipe!
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	165 call delete('Xtest1')
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	166 call delete('Xtest2')
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	167 call delete('Xtest3')
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer Christian Brabandt <cb@256bit.org> parents: 14605 diff changeset	168 endfunc
16453 4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	169
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	170 func Test_swapfile_delete()
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	171 autocmd! SwapExists
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	172 function s:swap_exists()
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	173 let v:swapchoice = s:swap_choice
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	174 let s:swapname = v:swapname
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	175 let s:filename = expand('<afile>')
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	176 endfunc
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	177 augroup test_swapfile_delete
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	178 autocmd!
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	179 autocmd SwapExists * call s:swap_exists()
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	180 augroup END
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	181
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	182
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	183 " Create a valid swapfile by editing a file.
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	184 split XswapfileText
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	185 call setline(1, ['one', 'two', 'three'])
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	186 write " file is written, not modified
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	187 " read the swapfile as a Blob
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	188 let swapfile_name = swapname('%')
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	189 let swapfile_bytes = readfile(swapfile_name, 'B')
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	190
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	191 " Close the file and recreate the swap file.
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	192 " Now editing the file will run into the process still existing
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	193 quit
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	194 call writefile(swapfile_bytes, swapfile_name)
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	195 let s:swap_choice = 'e'
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	196 let s:swapname = ''
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	197 split XswapfileText
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	198 quit
16459 4ea761ce795b patch 8.1.1234: swap file test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 16453 diff changeset	199 call assert_equal(fnamemodify(swapfile_name, ':t'), fnamemodify(s:swapname, ':t'))
16453 4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	200
18277 f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	201 " This test won't work as root because root can successfully run kill(1, 0)
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	202 if !IsRoot()
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	203 " Write the swapfile with a modified PID, now it will be automatically
25010 a4647ee8e163 patch 8.2.3042: swap file test fails Bram Moolenaar <Bram@vim.org> parents: 24828 diff changeset	204 " deleted. Process 0x3fffffff most likely does not exist.
a4647ee8e163 patch 8.2.3042: swap file test fails Bram Moolenaar <Bram@vim.org> parents: 24828 diff changeset	205 let swapfile_bytes[24:27] = 0zffffff3f
18277 f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	206 call writefile(swapfile_bytes, swapfile_name)
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	207 let s:swapname = ''
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	208 split XswapfileText
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	209 quit
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	210 call assert_equal('', s:swapname)
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 18017 diff changeset	211 endif
16453 4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	212
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	213 " Now set the modified flag, the swap file will not be deleted
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	214 let swapfile_bytes[28 + 80 + 899] = 0x55
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	215 call writefile(swapfile_bytes, swapfile_name)
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	216 let s:swapname = ''
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	217 split XswapfileText
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	218 quit
16459 4ea761ce795b patch 8.1.1234: swap file test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 16453 diff changeset	219 call assert_equal(fnamemodify(swapfile_name, ':t'), fnamemodify(s:swapname, ':t'))
16453 4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	220
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	221 call delete('XswapfileText')
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	222 call delete(swapfile_name)
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	223 augroup test_swapfile_delete
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	224 autocmd!
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	225 augroup END
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	226 augroup! test_swapfile_delete
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily Bram Moolenaar <Bram@vim.org> parents: 15645 diff changeset	227 endfunc
16738 b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	228
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	229 func Test_swap_recover()
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	230 autocmd! SwapExists
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	231 augroup test_swap_recover
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	232 autocmd!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	233 autocmd SwapExists * let v:swapchoice = 'r'
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	234 augroup END
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	235
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	236
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	237 call mkdir('Xswap')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	238 let $Xswap = 'foo' " Check for issue #4369.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	239 set dir=Xswap//
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	240 " Create a valid swapfile by editing a file.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	241 split Xswap/text
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	242 call setline(1, ['one', 'two', 'three'])
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	243 write " file is written, not modified
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	244 " read the swapfile as a Blob
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	245 let swapfile_name = swapname('%')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	246 let swapfile_bytes = readfile(swapfile_name, 'B')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	247
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	248 " Close the file and recreate the swap file.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	249 quit
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	250 call writefile(swapfile_bytes, swapfile_name)
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	251 " Edit the file again. This triggers recovery.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	252 try
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	253 split Xswap/text
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	254 catch
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	255 " E308 should be caught, not E305.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	256 call assert_exception('E308:') " Original file may have been changed
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	257 endtry
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	258 " The file should be recovered.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	259 call assert_equal(['one', 'two', 'three'], getline(1, 3))
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	260 quit!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	261
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	262 call delete('Xswap/text')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	263 call delete(swapfile_name)
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	264 call delete('Xswap', 'd')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	265 unlet $Xswap
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	266 set dir&
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	267 augroup test_swap_recover
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	268 autocmd!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	269 augroup END
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	270 augroup! test_swap_recover
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	271 endfunc
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	272
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	273 func Test_swap_recover_ext()
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	274 autocmd! SwapExists
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	275 augroup test_swap_recover_ext
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	276 autocmd!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	277 autocmd SwapExists * let v:swapchoice = 'r'
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	278 augroup END
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	279
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	280 " Create a valid swapfile by editing a file with a special extension.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	281 split Xtest.scr
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	282 call setline(1, ['one', 'two', 'three'])
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	283 write " file is written, not modified
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	284 write " write again to make sure the swapfile is created
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	285 " read the swapfile as a Blob
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	286 let swapfile_name = swapname('%')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	287 let swapfile_bytes = readfile(swapfile_name, 'B')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	288
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	289 " Close and delete the file and recreate the swap file.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	290 quit
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	291 call delete('Xtest.scr')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	292 call writefile(swapfile_bytes, swapfile_name)
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	293 " Edit the file again. This triggers recovery.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	294 try
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	295 split Xtest.scr
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	296 catch
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	297 " E308 should be caught, not E306.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	298 call assert_exception('E308:') " Original file may have been changed
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	299 endtry
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	300 " The file should be recovered.
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	301 call assert_equal(['one', 'two', 'three'], getline(1, 3))
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	302 quit!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	303
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	304 call delete('Xtest.scr')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	305 call delete(swapfile_name)
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	306 augroup test_swap_recover_ext
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	307 autocmd!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	308 augroup END
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	309 augroup! test_swap_recover_ext
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file Bram Moolenaar <Bram@vim.org> parents: 16459 diff changeset	310 endfunc
19435 8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	311
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	312 " Test for closing a split window automatically when a swap file is detected
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	313 " and 'Q' is selected in the confirmation prompt.
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	314 func Test_swap_split_win()
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	315 autocmd! SwapExists
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	316 augroup test_swap_splitwin
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	317 autocmd!
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	318 autocmd SwapExists * let v:swapchoice = 'q'
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	319 augroup END
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	320
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	321 " Create a valid swapfile by editing a file with a special extension.
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	322 split Xtest.scr
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	323 call setline(1, ['one', 'two', 'three'])
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	324 write " file is written, not modified
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	325 write " write again to make sure the swapfile is created
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	326 " read the swapfile as a Blob
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	327 let swapfile_name = swapname('%')
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	328 let swapfile_bytes = readfile(swapfile_name, 'B')
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	329
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	330 " Close and delete the file and recreate the swap file.
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	331 quit
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	332 call delete('Xtest.scr')
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	333 call writefile(swapfile_bytes, swapfile_name)
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	334 " Split edit the file again. This should fail to open the window
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	335 try
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	336 split Xtest.scr
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	337 catch
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	338 " E308 should be caught, not E306.
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	339 call assert_exception('E308:') " Original file may have been changed
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	340 endtry
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	341 call assert_equal(1, winnr('$'))
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	342
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	343 call delete('Xtest.scr')
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	344 call delete(swapfile_name)
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	345
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	346 augroup test_swap_splitwin
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	347 autocmd!
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	348 augroup END
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	349 augroup! test_swap_splitwin
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	350 endfunc
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	351
19487 0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	352 " Test for selecting 'q' in the attention prompt
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	353 func Test_swap_prompt_splitwin()
19776 42e4083429a7 patch 8.2.0444: swap file test fails on some systems Bram Moolenaar <Bram@vim.org> parents: 19487 diff changeset	354 CheckRunVimInTerminal
42e4083429a7 patch 8.2.0444: swap file test fails on some systems Bram Moolenaar <Bram@vim.org> parents: 19487 diff changeset	355
19487 0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	356 call writefile(['foo bar'], 'Xfile1')
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	357 edit Xfile1
19776 42e4083429a7 patch 8.2.0444: swap file test fails on some systems Bram Moolenaar <Bram@vim.org> parents: 19487 diff changeset	358 preserve " should help to make sure the swap file exists
42e4083429a7 patch 8.2.0444: swap file test fails on some systems Bram Moolenaar <Bram@vim.org> parents: 19487 diff changeset	359
19487 0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	360 let buf = RunVimInTerminal('', {'rows': 20})
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	361 call term_sendkeys(buf, ":set nomore\n")
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	362 call term_sendkeys(buf, ":set noruler\n")
25120 2d3660601fdb patch 8.2.3097: crash when using "quit" at recovery prompt Bram Moolenaar <Bram@vim.org> parents: 25010 diff changeset	363
19487 0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	364 call term_sendkeys(buf, ":split Xfile1\n")
19954 c087099e9163 patch 8.2.0533: tests using term_wait() can still be flaky Bram Moolenaar <Bram@vim.org> parents: 19776 diff changeset	365 call TermWait(buf)
19487 0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	366 call WaitForAssert({-> assert_match('^\[O\]pen Read-Only, (E)dit anyway, (R)ecover, (Q)uit, (A)bort: $', term_getline(buf, 20))})
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	367 call term_sendkeys(buf, "q")
19954 c087099e9163 patch 8.2.0533: tests using term_wait() can still be flaky Bram Moolenaar <Bram@vim.org> parents: 19776 diff changeset	368 call TermWait(buf)
19776 42e4083429a7 patch 8.2.0444: swap file test fails on some systems Bram Moolenaar <Bram@vim.org> parents: 19487 diff changeset	369 call term_sendkeys(buf, ":\<CR>")
19487 0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	370 call WaitForAssert({-> assert_match('^:$', term_getline(buf, 20))})
19776 42e4083429a7 patch 8.2.0444: swap file test fails on some systems Bram Moolenaar <Bram@vim.org> parents: 19487 diff changeset	371 call term_sendkeys(buf, ":echomsg winnr('$')\<CR>")
19954 c087099e9163 patch 8.2.0533: tests using term_wait() can still be flaky Bram Moolenaar <Bram@vim.org> parents: 19776 diff changeset	372 call TermWait(buf)
19487 0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	373 call WaitForAssert({-> assert_match('^1$', term_getline(buf, 20))})
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	374 call StopVimInTerminal(buf)
25120 2d3660601fdb patch 8.2.3097: crash when using "quit" at recovery prompt Bram Moolenaar <Bram@vim.org> parents: 25010 diff changeset	375
25131 ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	376 " This caused Vim to crash when typing "q" at the swap file prompt.
ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	377 let buf = RunVimInTerminal('-c "au bufadd * let foo_w = wincol()"', {'rows': 18})
ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	378 call term_sendkeys(buf, ":e Xfile1\<CR>")
ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	379 call WaitForAssert({-> assert_match('More', term_getline(buf, 18))})
ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	380 call term_sendkeys(buf, " ")
ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	381 call WaitForAssert({-> assert_match('^\[O\]pen Read-Only, (E)dit anyway, (R)ecover, (Q)uit, (A)bort:', term_getline(buf, 18))})
ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	382 call term_sendkeys(buf, "q")
25120 2d3660601fdb patch 8.2.3097: crash when using "quit" at recovery prompt Bram Moolenaar <Bram@vim.org> parents: 25010 diff changeset	383 call TermWait(buf)
25131 ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	384 " check that Vim is still running
ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	385 call term_sendkeys(buf, ":echo 'hello'\<CR>")
ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	386 call WaitForAssert({-> assert_match('^hello', term_getline(buf, 18))})
ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	387 call term_sendkeys(buf, ":%bwipe!\<CR>")
ba16f025f2e2 patch 8.2.3102: test for crash fix does not fail without the fix Bram Moolenaar <Bram@vim.org> parents: 25120 diff changeset	388 call StopVimInTerminal(buf)
25120 2d3660601fdb patch 8.2.3097: crash when using "quit" at recovery prompt Bram Moolenaar <Bram@vim.org> parents: 25010 diff changeset	389
19487 0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	390 %bwipe!
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	391 call delete('Xfile1')
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	392 endfunc
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling Bram Moolenaar <Bram@vim.org> parents: 19435 diff changeset	393
21337 647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	394 func Test_swap_symlink()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21337 diff changeset	395 CheckUnix
21337 647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	396
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	397 call writefile(['text'], 'Xtestfile')
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	398 silent !ln -s -f Xtestfile Xtestlink
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	399
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	400 set dir=.
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	401
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	402 " Test that swap file uses the name of the file when editing through a
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	403 " symbolic link (so that editing the file twice is detected)
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	404 edit Xtestlink
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	405 call assert_match('Xtestfile\.swp$', s:swapname())
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	406 bwipe!
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	407
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	408 call mkdir('Xswapdir')
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	409 exe 'set dir=' . getcwd() . '/Xswapdir//'
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	410
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	411 " Check that this also works when 'directory' ends with '//'
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	412 edit Xtestlink
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	413 call assert_match('Xtestfile\.swp$', s:swapname())
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	414 bwipe!
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	415
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	416 set dir&
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	417 call delete('Xtestfile')
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	418 call delete('Xtestlink')
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	419 call delete('Xswapdir', 'rf')
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	420 endfunc
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in // Bram Moolenaar <Bram@vim.org> parents: 19954 diff changeset	421
22995 94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	422 func s:get_unused_pid(base)
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	423 if has('job')
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	424 " Execute 'echo' as a temporary job, and return its pid as an unused pid.
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	425 if has('win32')
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	426 let cmd = 'cmd /c echo'
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	427 else
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	428 let cmd = 'echo'
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	429 endif
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	430 let j = job_start(cmd)
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	431 while job_status(j) ==# 'run'
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	432 sleep 10m
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	433 endwhile
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	434 if job_status(j) ==# 'dead'
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	435 return job_info(j).process
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	436 endif
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	437 endif
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	438 " Must add four for MS-Windows to see it as a different one.
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	439 return a:base + 4
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	440 endfunc
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	441
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	442 func s:blob_to_pid(b)
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	443 return a:b[3] * 16777216 + a:b[2] * 65536 + a:b[1] * 256 + a:b[0]
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	444 endfunc
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	445
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	446 func s:pid_to_blob(i)
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	447 let b = 0z
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	448 let b[0] = and(a:i, 0xff)
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	449 let b[1] = and(a:i / 256, 0xff)
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	450 let b[2] = and(a:i / 65536, 0xff)
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	451 let b[3] = and(a:i / 16777216, 0xff)
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	452 return b
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	453 endfunc
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	454
22846 83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	455 func Test_swap_auto_delete()
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	456 " Create a valid swapfile by editing a file with a special extension.
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	457 split Xtest.scr
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	458 call setline(1, ['one', 'two', 'three'])
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	459 write " file is written, not modified
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	460 write " write again to make sure the swapfile is created
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	461 " read the swapfile as a Blob
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	462 let swapfile_name = swapname('%')
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	463 let swapfile_bytes = readfile(swapfile_name, 'B')
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	464
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	465 " Forget about the file, recreate the swap file, then edit it again. The
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	466 " swap file should be automatically deleted.
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	467 bwipe!
22995 94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	468 " Change the process ID to avoid the "still running" warning.
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	469 let swapfile_bytes[24:27] = s:pid_to_blob(s:get_unused_pid(
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails Bram Moolenaar <Bram@vim.org> parents: 22944 diff changeset	470 \ s:blob_to_pid(swapfile_bytes[24:27])))
22846 83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	471 call writefile(swapfile_bytes, swapfile_name)
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	472 edit Xtest.scr
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	473 " will end up using the same swap file after deleting the existing one
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	474 call assert_equal(swapfile_name, swapname('%'))
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	475 bwipe!
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	476
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	477 " create the swap file again, but change the host name so that it won't be
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	478 " deleted
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	479 autocmd! SwapExists
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	480 augroup test_swap_recover_ext
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	481 autocmd!
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	482 autocmd SwapExists * let v:swapchoice = 'e'
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	483 augroup END
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	484
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	485 " change the host name
22938 760526e5cd29 patch 8.2.2016: swap file test is a little flaky Bram Moolenaar <Bram@vim.org> parents: 22846 diff changeset	486 let swapfile_bytes[28 + 40] = swapfile_bytes[28 + 40] + 2
22846 83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	487 call writefile(swapfile_bytes, swapfile_name)
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	488 edit Xtest.scr
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	489 call assert_equal(1, filereadable(swapfile_name))
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	490 " will use another same swap file name
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	491 call assert_notequal(swapfile_name, swapname('%'))
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	492 bwipe!
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	493
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	494 call delete('Xtest.scr')
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	495 call delete(swapfile_name)
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	496 augroup test_swap_recover_ext
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	497 autocmd!
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	498 augroup END
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	499 augroup! test_swap_recover_ext
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	500 endfunc
83c2c489cb1b patch 8.2.1970: it is easy to make mistakes when cleaning up swap files Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	501
24814 4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	502 " Test for renaming a buffer when the swap file is deleted out-of-band
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	503 func Test_missing_swap_file()
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	504 CheckUnix
25133 e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	505 new Xfile2
24828 e0c43439fea6 patch 8.2.2952: recover test fails on big endian systems Bram Moolenaar <Bram@vim.org> parents: 24814 diff changeset	506 call delete(swapname(''))
25133 e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	507 call assert_fails('file Xfile3', 'E301:')
e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	508 call assert_equal('Xfile3', bufname())
24814 4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	509 call assert_true(bufexists('Xfile2'))
25133 e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	510 call assert_true(bufexists('Xfile3'))
24814 4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	511 %bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	512 endfunc
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	513
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	514 " Test for :preserve command
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	515 func Test_preserve()
25133 e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	516 new Xfile4
24814 4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	517 setlocal noswapfile
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	518 call assert_fails('preserve', 'E313:')
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	519 bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	520 endfunc
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	521
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	522 " Test for the v:swapchoice variable
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	523 func Test_swapchoice()
25133 e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	524 call writefile(['aaa', 'bbb'], 'Xfile5')
e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	525 edit Xfile5
24814 4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	526 preserve
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	527 let swapfname = swapname('')
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	528 let b = readblob(swapfname)
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	529 bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	530 call writefile(b, swapfname)
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	531
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	532 autocmd! SwapExists
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	533
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	534 " Test for v:swapchoice = 'o' (readonly)
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	535 augroup test_swapchoice
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	536 autocmd!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	537 autocmd SwapExists * let v:swapchoice = 'o'
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	538 augroup END
25133 e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	539 edit Xfile5
24814 4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	540 call assert_true(&readonly)
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	541 call assert_equal(['aaa', 'bbb'], getline(1, '$'))
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	542 %bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	543 call assert_true(filereadable(swapfname))
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	544
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	545 " Test for v:swapchoice = 'a' (abort)
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	546 augroup test_swapchoice
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	547 autocmd!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	548 autocmd SwapExists * let v:swapchoice = 'a'
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	549 augroup END
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	550 try
25133 e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	551 edit Xfile5
24814 4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	552 catch /^Vim:Interrupt$/
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	553 endtry
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	554 call assert_equal('', @%)
25133 e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	555 call assert_true(bufexists('Xfile5'))
24814 4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	556 %bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	557 call assert_true(filereadable(swapfname))
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	558
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	559 " Test for v:swapchoice = 'd' (delete)
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	560 augroup test_swapchoice
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	561 autocmd!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	562 autocmd SwapExists * let v:swapchoice = 'd'
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	563 augroup END
25133 e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	564 edit Xfile5
e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	565 call assert_equal('Xfile5', @%)
24814 4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	566 %bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	567 call assert_false(filereadable(swapfname))
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	568
25133 e0baf334f1ca patch 8.2.3103: swap test may fail on some systems Bram Moolenaar <Bram@vim.org> parents: 25131 diff changeset	569 call delete('Xfile5')
24814 4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	570 call delete(swapfname)
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	571 augroup test_swapchoice
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	572 autocmd!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	573 augroup END
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	574 augroup! test_swapchoice
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	575 endfunc
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested Bram Moolenaar <Bram@vim.org> parents: 22995 diff changeset	576
25200 da0e5ff44b14 patch 8.2.3136: no test for E187 and "No swap file" Bram Moolenaar <Bram@vim.org> parents: 25133 diff changeset	577 func Test_no_swap_file()
da0e5ff44b14 patch 8.2.3136: no test for E187 and "No swap file" Bram Moolenaar <Bram@vim.org> parents: 25133 diff changeset	578 call assert_equal("\nNo swap file", execute('swapname'))
da0e5ff44b14 patch 8.2.3136: no test for E187 and "No swap file" Bram Moolenaar <Bram@vim.org> parents: 25133 diff changeset	579 endfunc
da0e5ff44b14 patch 8.2.3136: no test for E187 and "No swap file" Bram Moolenaar <Bram@vim.org> parents: 25133 diff changeset	580
19435 8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 18277 diff changeset	581 " vim: shiftwidth=2 sts=2 expandtab

Mercurial > vim

annotate src/testdir/test_swap.vim @ 25384:e8e2c4d33b9b v8.2.3229