1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
" Test rename()
source shared.vim
func Test_rename_file_to_file()
call writefile(['foo'], 'Xrename1')
call assert_equal(0, rename('Xrename1', 'Xrename2'))
call assert_equal('', glob('Xrename1'))
call assert_equal(['foo'], readfile('Xrename2'))
" When the destination file already exists, it should be overwritten.
call writefile(['foo'], 'Xrename1')
call writefile(['bar'], 'Xrename2')
call assert_equal(0, rename('Xrename1', 'Xrename2'))
call assert_equal('', glob('Xrename1'))
call assert_equal(['foo'], readfile('Xrename2'))
call delete('Xrename2')
endfunc
func Test_rename_file_ignore_case()
" With 'fileignorecase', renaming file will go through a temp file
" when the source and destination file only differ by case.
set fileignorecase
call writefile(['foo'], 'Xrename')
call assert_equal(0, 'Xrename'->rename('XRENAME'))
call assert_equal(['foo'], readfile('XRENAME'))
set fileignorecase&
call delete('XRENAME')
endfunc
func Test_rename_same_file()
call writefile(['foo'], 'Xrename')
" When the source and destination are the same file, nothing
" should be done. The source file should not be deleted.
call assert_equal(0, rename('Xrename', 'Xrename'))
call assert_equal(['foo'], readfile('Xrename'))
call assert_equal(0, rename('./Xrename', 'Xrename'))
call assert_equal(['foo'], readfile('Xrename'))
call delete('Xrename')
endfunc
func Test_rename_dir_to_dir()
call mkdir('Xrenamedir1')
call writefile(['foo'], 'Xrenamedir1/Xrenamefile')
call assert_equal(0, rename('Xrenamedir1', 'Xrenamedir2'))
call assert_equal('', glob('Xrenamedir1'))
call assert_equal(['foo'], readfile('Xrenamedir2/Xrenamefile'))
call delete('Xrenamedir2/Xrenamefile')
call delete('Xrenamedir2', 'd')
endfunc
func Test_rename_same_dir()
call mkdir('Xrenamedir')
call writefile(['foo'], 'Xrenamedir/Xrenamefile')
call assert_equal(0, rename('Xrenamedir', 'Xrenamedir'))
call assert_equal(['foo'], readfile('Xrenamedir/Xrenamefile'))
call delete('Xrenamedir/Xrenamefile')
call delete('Xrenamedir', 'd')
endfunc
func Test_rename_copy()
" Check that when original file can't be deleted, rename()
" still succeeds but copies the file.
call mkdir('Xrenamedir')
call writefile(['foo'], 'Xrenamedir/Xrenamefile')
call setfperm('Xrenamedir', 'r-xr-xr-x')
call assert_equal(0, rename('Xrenamedir/Xrenamefile', 'Xrenamefile'))
if !has('win32') && !IsRoot()
" On Windows, the source file is removed despite
" its directory being made not writable.
call assert_equal(['foo'], readfile('Xrenamedir/Xrenamefile'))
endif
call assert_equal(['foo'], readfile('Xrenamefile'))
call setfperm('Xrenamedir', 'rwxrwxrwx')
call delete('Xrenamedir/Xrenamefile')
call delete('Xrenamedir', 'd')
call delete('Xrenamefile')
endfunc
func Test_rename_fails()
call writefile(['foo'], 'Xrenamefile')
" Can't rename into a non-existing directory.
call assert_notequal(0, rename('Xrenamefile', 'Xdoesnotexist/Xrenamefile'))
" Can't rename a non-existing file.
call assert_notequal(0, rename('Xdoesnotexist', 'Xrenamefile2'))
call assert_equal('', glob('Xrenamefile2'))
" When rename() fails, the destination file should not be deleted.
call assert_notequal(0, rename('Xdoesnotexist', 'Xrenamefile'))
call assert_equal(['foo'], readfile('Xrenamefile'))
" Can't rename to en empty file name.
call assert_notequal(0, rename('Xrenamefile', ''))
call assert_fails('call rename("Xrenamefile", [])', 'E730:')
call assert_fails('call rename(0z, "Xrenamefile")', 'E976:')
call delete('Xrenamefile')
endfunc
" vim: shiftwidth=2 sts=2 expandtab
|