annotate src/testdir/test_swap.vim @ 30769:ae10b91ac6b3 v9.0.0719

patch 9.0.0719: too many delete() calls in tests Commit: https://github.com/vim/vim/commit/56564964e6d0956c29687e8a10cb94fe42f5c097 Author: Bram Moolenaar <Bram@vim.org> Date: Mon Oct 10 22:39:42 2022 +0100 patch 9.0.0719: too many delete() calls in tests Problem: Too many delete() calls in tests. Solution: Use deferred delete where possible.
author Bram Moolenaar <Bram@vim.org>
date Mon, 10 Oct 2022 23:45:04 +0200
parents a4aad5142959
children 56a2af8c0980
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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']
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
19 call writefile(content, 'Xtest1', 'D')
12777
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
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
33 call mkdir("Xtest2", 'R')
12777
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
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
43 call mkdir("Xtest.je", 'R')
12777
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 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
53
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
54 func Test_swap_group()
21765
08940efa6b4e patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents: 21337
diff changeset
55 CheckUnix
08940efa6b4e patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents: 21337
diff changeset
56
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
57 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
58 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
59 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
60 endif
12750
0b6c09957b43 patch 8.0.1253: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
61
12779
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
62 try
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
63 call delete('Xtest')
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
64 split Xtest
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
65 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
66 wq
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
67 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
68 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
69 else
12779
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
70 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
71 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
72 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
73 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
74 else
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
75 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
76 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
77 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
78 " 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
79 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
80
12779
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
81 bwipe!
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
82 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
83 endif
12779
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
84 finally
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
85 call delete('Xtest')
73eb8a2d7f04 patch 8.0.1267: Test_swap_group may leave file behind
Christian Brabandt <cb@256bit.org>
parents: 12777
diff changeset
86 endtry
12750
0b6c09957b43 patch 8.0.1253: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
87 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
88
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory
Christian Brabandt <cb@256bit.org>
parents: 12779
diff changeset
89 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
90 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
91 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
92
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 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
94 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
95 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
96 " 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
97 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
98 only
4d5a1ada407e patch 8.0.1819: swap file warning for file with non-existing directory
Christian Brabandt <cb@256bit.org>
parents: 12779
diff changeset
99
15645
f315ab10d579 patch 8.1.0830: test leaves directory behind on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 14778
diff changeset
100 " 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
101 " 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
102 %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
103 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
104 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
105 endfunc
14599
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
106
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
107 func Test_swapinfo()
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
108 new Xswapinfo
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
109 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
110 w
14778
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
111 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
112 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
113 let info = fname->swapinfo()
14605
0c47880f3d95 patch 8.1.0316: swapinfo() test fails on Travis
Christian Brabandt <cb@256bit.org>
parents: 14601
diff changeset
114
0c47880f3d95 patch 8.1.0316: swapinfo() test fails on Travis
Christian Brabandt <cb@256bit.org>
parents: 14601
diff changeset
115 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
116 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
117
14599
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
118 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
119 " 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
120 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
121 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
122 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
123 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
124 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
125 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
126 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
127 endif
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
128 bwipe!
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
129 call delete(fname)
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
130 call delete('Xswapinfo')
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
131
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
132 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
133 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
134
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
135 call writefile(['burp'], 'Xnotaswapfile', 'D')
14599
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
136 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
137 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
138 call delete('Xnotaswapfile')
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
139
72d6f6f7ead7 patch 8.1.0313: information about a swap file is unavailable
Christian Brabandt <cb@256bit.org>
parents: 13896
diff changeset
140 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
141 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
142 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
143 endfunc
14778
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
144
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
145 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
146 edit Xtest1
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
147 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
148 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
149
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
150 new Xtest2
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
151 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
152 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
153 wincmd p
18017
988e5a868b60 patch 8.1.2004: more functions can be used as methods
Bram Moolenaar <Bram@vim.org>
parents: 16738
diff changeset
154 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
155
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
156 new Xtest3
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
157 setlocal noswapfile
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
158 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
159
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
160 bwipe!
20653d6f3d95 patch 8.1.0401: can't get swap name of another buffer
Christian Brabandt <cb@256bit.org>
parents: 14605
diff changeset
161 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
162 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
163 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
164 endfunc
16453
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
165
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
166 func Test_swapfile_delete()
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
167 autocmd! SwapExists
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
168 function s:swap_exists()
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
169 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
170 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
171 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
172 endfunc
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
173 augroup test_swapfile_delete
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
174 autocmd!
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
175 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
176 augroup END
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
177
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
178
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
179 " 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
180 split XswapfileText
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
181 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
182 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
183 " 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
184 let swapfile_name = swapname('%')
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
185 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
186
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
187 " 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
188 " 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
189 quit
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
190 call writefile(swapfile_bytes, swapfile_name, 'D')
16453
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
191 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
192 let s:swapname = ''
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
193 split XswapfileText
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
194 quit
16459
4ea761ce795b patch 8.1.1234: swap file test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 16453
diff changeset
195 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
196
18277
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root
Bram Moolenaar <Bram@vim.org>
parents: 18017
diff changeset
197 " 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
198 if !IsRoot()
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root
Bram Moolenaar <Bram@vim.org>
parents: 18017
diff changeset
199 " 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
200 " 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
201 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
202 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
203 let s:swapname = ''
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root
Bram Moolenaar <Bram@vim.org>
parents: 18017
diff changeset
204 split XswapfileText
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root
Bram Moolenaar <Bram@vim.org>
parents: 18017
diff changeset
205 quit
f6dcf7eabd26 patch 8.1.2133: some tests fail when run as root
Bram Moolenaar <Bram@vim.org>
parents: 18017
diff changeset
206 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
207 endif
16453
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
208
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
209 " 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
210 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
211 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
212 let s:swapname = ''
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
213 split XswapfileText
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
214 quit
16459
4ea761ce795b patch 8.1.1234: swap file test fails on MS-Windows
Bram Moolenaar <Bram@vim.org>
parents: 16453
diff changeset
215 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
216
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
217 call delete('XswapfileText')
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
218 augroup test_swapfile_delete
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
219 autocmd!
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
220 augroup END
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
221 augroup! test_swapfile_delete
4e9bea9b8025 patch 8.1.1231: asking about existing swap file unnecessarily
Bram Moolenaar <Bram@vim.org>
parents: 15645
diff changeset
222 endfunc
16738
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
223
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
224 func Test_swap_recover()
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
225 autocmd! SwapExists
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
226 augroup test_swap_recover
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
227 autocmd!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
228 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
229 augroup END
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
230
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
231 call mkdir('Xswap', 'R')
16738
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
232 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
233 set dir=Xswap//
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
234 " 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
235 split Xswap/text
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
236 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
237 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
238 " 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
239 let swapfile_name = swapname('%')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
240 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
241
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
242 " 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
243 quit
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
244 call writefile(swapfile_bytes, swapfile_name, 'D')
16738
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
245 " 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
246 try
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
247 split Xswap/text
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
248 catch
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
249 " 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
250 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
251 endtry
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
252 " 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
253 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
254 quit!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
255
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
256 unlet $Xswap
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
257 set dir&
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
258 augroup test_swap_recover
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
259 autocmd!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
260 augroup END
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
261 augroup! test_swap_recover
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
262 endfunc
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
263
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
264 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
265 autocmd! SwapExists
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
266 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
267 autocmd!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
268 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
269 augroup END
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
270
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
271 " 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
272 split Xtest.scr
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
273 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
274 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
275 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
276 " 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
277 let swapfile_name = swapname('%')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
278 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
279
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
280 " 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
281 quit
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
282 call delete('Xtest.scr')
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
283 call writefile(swapfile_bytes, swapfile_name, 'D')
16738
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
284 " 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
285 try
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
286 split Xtest.scr
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
287 catch
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
288 " 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
289 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
290 endtry
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
291 " 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
292 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
293 quit!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
294
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
295 call delete('Xtest.scr')
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
296 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
297 autocmd!
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
298 augroup END
b52ea9c5f1db patch 8.1.1371: cannot recover from a swap file
Bram Moolenaar <Bram@vim.org>
parents: 16459
diff changeset
299 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
300 endfunc
19435
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
301
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
302 " 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
303 " 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
304 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
305 autocmd! SwapExists
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
306 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
307 autocmd!
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
308 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
309 augroup END
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
310
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
311 " 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
312 split Xtest.scr
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
313 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
314 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
315 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
316 " 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
317 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
318 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
319
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
320 " 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
321 quit
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
322 call delete('Xtest.scr')
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
323 call writefile(swapfile_bytes, swapfile_name, 'D')
19435
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
324 " 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
325 try
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
326 split Xtest.scr
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
327 catch
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
328 " 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
329 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
330 endtry
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
331 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
332
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
333 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
334
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
335 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
336 autocmd!
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
337 augroup END
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
338 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
339 endfunc
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
340
19487
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling
Bram Moolenaar <Bram@vim.org>
parents: 19435
diff changeset
341 " 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
342 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
343 CheckRunVimInTerminal
42e4083429a7 patch 8.2.0444: swap file test fails on some systems
Bram Moolenaar <Bram@vim.org>
parents: 19487
diff changeset
344
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
345 call writefile(['foo bar'], 'Xfile1', 'D')
19487
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling
Bram Moolenaar <Bram@vim.org>
parents: 19435
diff changeset
346 edit Xfile1
19776
42e4083429a7 patch 8.2.0444: swap file test fails on some systems
Bram Moolenaar <Bram@vim.org>
parents: 19487
diff changeset
347 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
348
19487
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling
Bram Moolenaar <Bram@vim.org>
parents: 19435
diff changeset
349 let buf = RunVimInTerminal('', {'rows': 20})
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling
Bram Moolenaar <Bram@vim.org>
parents: 19435
diff changeset
350 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
351 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
352
19487
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling
Bram Moolenaar <Bram@vim.org>
parents: 19435
diff changeset
353 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
354 call TermWait(buf)
19487
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling
Bram Moolenaar <Bram@vim.org>
parents: 19435
diff changeset
355 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
356 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
357 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
358 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
359 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
360 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
361 call TermWait(buf)
19487
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling
Bram Moolenaar <Bram@vim.org>
parents: 19435
diff changeset
362 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
363 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
364
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
365 " 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
366 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
367 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
368 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
369 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
370 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
371 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
372 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
373 " 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
374 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
375 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
376 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
377 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
378
19487
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling
Bram Moolenaar <Bram@vim.org>
parents: 19435
diff changeset
379 %bwipe!
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling
Bram Moolenaar <Bram@vim.org>
parents: 19435
diff changeset
380 endfunc
0aba9ef12488 patch 8.2.0301: insufficient testing for exception handling
Bram Moolenaar <Bram@vim.org>
parents: 19435
diff changeset
381
21337
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
382 func Test_swap_symlink()
21765
08940efa6b4e patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents: 21337
diff changeset
383 CheckUnix
21337
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
384
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
385 call writefile(['text'], 'Xtestfile', 'D')
21337
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
386 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
387
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
388 set dir=.
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
389
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
390 " 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
391 " 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
392 edit Xtestlink
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
393 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
394 bwipe!
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
395
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
396 call mkdir('Xswapdir', 'R')
21337
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
397 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
398
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
399 " 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
400 edit Xtestlink
26018
c2d4e40a32a6 patch 8.2.3543: swapname has double slash when 'directory' ends in it
Bram Moolenaar <Bram@vim.org>
parents: 25200
diff changeset
401 call assert_match('Xswapdir[/\\]%.*testdir%Xtestfile\.swp$', s:swapname())
21337
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
402 bwipe!
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
403
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
404 set dir&
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
405 call delete('Xtestlink')
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
406 endfunc
647897e6df9e patch 8.2.1219: symlink not followed if dirname ends in //
Bram Moolenaar <Bram@vim.org>
parents: 19954
diff changeset
407
22995
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
408 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
409 if has('job')
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
410 " 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
411 if has('win32')
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
412 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
413 else
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
414 let cmd = 'echo'
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
415 endif
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
416 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
417 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
418 sleep 10m
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
419 endwhile
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
420 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
421 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
422 endif
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
423 endif
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
424 " 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
425 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
426 endfunc
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
427
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
428 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
429 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
430 endfunc
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
431
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
432 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
433 let b = 0z
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
434 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
435 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
436 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
437 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
438 return b
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
439 endfunc
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
440
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
441 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
442 " 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
443 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
444 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
445 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
446 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
447 " 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
448 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
449 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
450
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
451 " 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
452 " 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
453 bwipe!
22995
94656f3ff304 patch 8.2.2044: MS-Windows: swap file test sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 22944
diff changeset
454 " 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
455 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
456 \ s:blob_to_pid(swapfile_bytes[24:27])))
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
457 call writefile(swapfile_bytes, swapfile_name, 'D')
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
458 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
459 " 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
460 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
461 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
462
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 " 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
464 " 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
465 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
466 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
467 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
468 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
469 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
470
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 " 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
472 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
473 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
474 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
475 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
476 " 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
477 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
478 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
479
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 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
481 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
482 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
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 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
485 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
486
24814
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
487 " 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
488 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
489 CheckUnix
25133
e0baf334f1ca patch 8.2.3103: swap test may fail on some systems
Bram Moolenaar <Bram@vim.org>
parents: 25131
diff changeset
490 new Xfile2
24828
e0c43439fea6 patch 8.2.2952: recover test fails on big endian systems
Bram Moolenaar <Bram@vim.org>
parents: 24814
diff changeset
491 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
492 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
493 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
494 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
495 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
496 %bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
497 endfunc
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
498
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
499 " 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
500 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
501 new Xfile4
24814
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
502 setlocal noswapfile
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
503 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
504 bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
505 endfunc
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
506
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
507 " 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
508 func Test_swapchoice()
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
509 call writefile(['aaa', 'bbb'], 'Xfile5', 'D')
25133
e0baf334f1ca patch 8.2.3103: swap test may fail on some systems
Bram Moolenaar <Bram@vim.org>
parents: 25131
diff changeset
510 edit Xfile5
24814
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
511 preserve
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
512 let swapfname = swapname('')
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
513 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
514 bw!
30769
ae10b91ac6b3 patch 9.0.0719: too many delete() calls in tests
Bram Moolenaar <Bram@vim.org>
parents: 28285
diff changeset
515 call writefile(b, swapfname, 'D')
24814
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
516
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
517 autocmd! SwapExists
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
518
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
519 " 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
520 augroup test_swapchoice
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
521 autocmd!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
522 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
523 augroup END
25133
e0baf334f1ca patch 8.2.3103: swap test may fail on some systems
Bram Moolenaar <Bram@vim.org>
parents: 25131
diff changeset
524 edit Xfile5
24814
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
525 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
526 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
527 %bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
528 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
529
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
530 " 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
531 augroup test_swapchoice
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
532 autocmd!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
533 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
534 augroup END
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
535 try
25133
e0baf334f1ca patch 8.2.3103: swap test may fail on some systems
Bram Moolenaar <Bram@vim.org>
parents: 25131
diff changeset
536 edit Xfile5
24814
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
537 catch /^Vim:Interrupt$/
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
538 endtry
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
539 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
540 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
541 %bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
542 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
543
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
544 " 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
545 augroup test_swapchoice
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
546 autocmd!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
547 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
548 augroup END
25133
e0baf334f1ca patch 8.2.3103: swap test may fail on some systems
Bram Moolenaar <Bram@vim.org>
parents: 25131
diff changeset
549 edit Xfile5
e0baf334f1ca patch 8.2.3103: swap test may fail on some systems
Bram Moolenaar <Bram@vim.org>
parents: 25131
diff changeset
550 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
551 %bw!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
552 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
553
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
554 call delete(swapfname)
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
555 augroup test_swapchoice
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
556 autocmd!
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
557 augroup END
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
558 augroup! test_swapchoice
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
559 endfunc
4c5eec1ef612 patch 8.2.2945: some buffer related code is not tested
Bram Moolenaar <Bram@vim.org>
parents: 22995
diff changeset
560
25200
da0e5ff44b14 patch 8.2.3136: no test for E187 and "No swap file"
Bram Moolenaar <Bram@vim.org>
parents: 25133
diff changeset
561 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
562 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
563 endfunc
da0e5ff44b14 patch 8.2.3136: no test for E187 and "No swap file"
Bram Moolenaar <Bram@vim.org>
parents: 25133
diff changeset
564
19435
8f8a5a15d00a patch 8.2.0275: some Ex code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18277
diff changeset
565 " vim: shiftwidth=2 sts=2 expandtab