1" Tests for startup. 2 3source shared.vim 4 5" Check that loading startup.vim works. 6func Test_startup_script() 7 set compatible 8 source $VIMRUNTIME/defaults.vim 9 10 call assert_equal(0, &compatible) 11endfunc 12 13" Verify the order in which plugins are loaded: 14" 1. plugins in non-after directories 15" 2. packages 16" 3. plugins in after directories 17func Test_after_comes_later() 18 if !has('packages') 19 return 20 endif 21 let before = [ 22 \ 'set nocp viminfo+=nviminfo', 23 \ 'set guioptions+=M', 24 \ 'let $HOME = "/does/not/exist"', 25 \ 'set loadplugins', 26 \ 'set rtp=Xhere,Xafter,Xanother', 27 \ 'set packpath=Xhere,Xafter', 28 \ 'set nomore', 29 \ 'let g:sequence = ""', 30 \ ] 31 let after = [ 32 \ 'redir! > Xtestout', 33 \ 'scriptnames', 34 \ 'redir END', 35 \ 'redir! > Xsequence', 36 \ 'echo g:sequence', 37 \ 'redir END', 38 \ 'quit', 39 \ ] 40 call mkdir('Xhere/plugin', 'p') 41 call writefile(['let g:sequence .= "here "'], 'Xhere/plugin/here.vim') 42 call mkdir('Xanother/plugin', 'p') 43 call writefile(['let g:sequence .= "another "'], 'Xanother/plugin/another.vim') 44 call mkdir('Xhere/pack/foo/start/foobar/plugin', 'p') 45 call writefile(['let g:sequence .= "pack "'], 'Xhere/pack/foo/start/foobar/plugin/foo.vim') 46 47 call mkdir('Xafter/plugin', 'p') 48 call writefile(['let g:sequence .= "after "'], 'Xafter/plugin/later.vim') 49 50 if RunVim(before, after, '') 51 52 let lines = readfile('Xtestout') 53 let expected = ['Xbefore.vim', 'here.vim', 'another.vim', 'foo.vim', 'later.vim', 'Xafter.vim'] 54 let found = [] 55 for line in lines 56 for one in expected 57 if line =~ one 58 call add(found, one) 59 endif 60 endfor 61 endfor 62 call assert_equal(expected, found) 63 endif 64 65 call assert_equal('here another pack after', substitute(join(readfile('Xsequence', 1), ''), '\s\+$', '', '')) 66 67 call delete('Xtestout') 68 call delete('Xsequence') 69 call delete('Xhere', 'rf') 70 call delete('Xanother', 'rf') 71 call delete('Xafter', 'rf') 72endfunc 73 74func Test_pack_in_rtp_when_plugins_run() 75 if !has('packages') 76 return 77 endif 78 let before = [ 79 \ 'set nocp viminfo+=nviminfo', 80 \ 'set guioptions+=M', 81 \ 'let $HOME = "/does/not/exist"', 82 \ 'set loadplugins', 83 \ 'set rtp=Xhere', 84 \ 'set packpath=Xhere', 85 \ 'set nomore', 86 \ ] 87 let after = [ 88 \ 'quit', 89 \ ] 90 call mkdir('Xhere/plugin', 'p') 91 call writefile(['redir! > Xtestout', 'silent set runtimepath?', 'silent! call foo#Trigger()', 'redir END'], 'Xhere/plugin/here.vim') 92 call mkdir('Xhere/pack/foo/start/foobar/autoload', 'p') 93 call writefile(['function! foo#Trigger()', 'echo "autoloaded foo"', 'endfunction'], 'Xhere/pack/foo/start/foobar/autoload/foo.vim') 94 95 if RunVim(before, after, '') 96 97 let lines = filter(readfile('Xtestout'), '!empty(v:val)') 98 call assert_match('Xhere[/\\]pack[/\\]foo[/\\]start[/\\]foobar', get(lines, 0)) 99 call assert_match('autoloaded foo', get(lines, 1)) 100 endif 101 102 call delete('Xtestout') 103 call delete('Xhere', 'rf') 104endfunc 105 106func Test_help_arg() 107 if !has('unix') && has('gui') 108 " this doesn't work with gvim on MS-Windows 109 return 110 endif 111 if RunVim([], [], '--help >Xtestout') 112 let lines = readfile('Xtestout') 113 call assert_true(len(lines) > 20) 114 call assert_match('Vi IMproved', lines[0]) 115 116 " check if couple of lines are there 117 let found = [] 118 for line in lines 119 if line =~ '-R.*Readonly mode' 120 call add(found, 'Readonly mode') 121 endif 122 " Watch out for a second --version line in the Gnome version. 123 if line =~ '--version.*Print version information and exit' 124 call add(found, "--version") 125 endif 126 endfor 127 call assert_equal(['Readonly mode', '--version'], found) 128 endif 129 call delete('Xtestout') 130endfunc 131 132func Test_compatible_args() 133 let after = [ 134 \ 'call writefile([string(&compatible)], "Xtestout")', 135 \ 'set viminfo+=nviminfo', 136 \ 'quit', 137 \ ] 138 if RunVim([], after, '-C') 139 let lines = readfile('Xtestout') 140 call assert_equal('1', lines[0]) 141 endif 142 143 if RunVim([], after, '-N') 144 let lines = readfile('Xtestout') 145 call assert_equal('0', lines[0]) 146 endif 147 148 call delete('Xtestout') 149endfunc 150 151func Test_file_args() 152 let after = [ 153 \ 'call writefile(argv(), "Xtestout")', 154 \ 'qall', 155 \ ] 156 if RunVim([], after, '') 157 let lines = readfile('Xtestout') 158 call assert_equal(0, len(lines)) 159 endif 160 161 if RunVim([], after, 'one') 162 let lines = readfile('Xtestout') 163 call assert_equal(1, len(lines)) 164 call assert_equal('one', lines[0]) 165 endif 166 167 if RunVim([], after, 'one two three') 168 let lines = readfile('Xtestout') 169 call assert_equal(3, len(lines)) 170 call assert_equal('one', lines[0]) 171 call assert_equal('two', lines[1]) 172 call assert_equal('three', lines[2]) 173 endif 174 175 if RunVim([], after, 'one -c echo two') 176 let lines = readfile('Xtestout') 177 call assert_equal(2, len(lines)) 178 call assert_equal('one', lines[0]) 179 call assert_equal('two', lines[1]) 180 endif 181 182 if RunVim([], after, 'one -- -c echo two') 183 let lines = readfile('Xtestout') 184 call assert_equal(4, len(lines)) 185 call assert_equal('one', lines[0]) 186 call assert_equal('-c', lines[1]) 187 call assert_equal('echo', lines[2]) 188 call assert_equal('two', lines[3]) 189 endif 190 191 call delete('Xtestout') 192endfunc 193 194func Test_startuptime() 195 if !has('startuptime') 196 return 197 endif 198 let after = ['qall'] 199 if RunVim([], after, '--startuptime Xtestout one') 200 let lines = readfile('Xtestout') 201 let expected = ['--- VIM STARTING ---', 'parsing arguments', 202 \ 'shell init', 'inits 3', 'start termcap', 'opening buffers'] 203 let found = [] 204 for line in lines 205 for exp in expected 206 if line =~ exp 207 call add(found, exp) 208 endif 209 endfor 210 endfor 211 call assert_equal(expected, found) 212 endif 213 call delete('Xtestout') 214endfunc 215 216func Test_read_stdin() 217 let after = [ 218 \ 'write Xtestout', 219 \ 'quit!', 220 \ ] 221 if RunVimPiped([], after, '-', 'echo something | ') 222 let lines = readfile('Xtestout') 223 " MS-Windows adds a space after the word 224 call assert_equal(['something'], split(lines[0])) 225 endif 226 call delete('Xtestout') 227endfunc 228 229func Test_progpath() 230 " Tests normally run with "./vim" or "../vim", these must have been expanded 231 " to a full path. 232 if has('unix') 233 call assert_equal('/', v:progpath[0]) 234 elseif has('win32') 235 call assert_equal(':', v:progpath[1]) 236 call assert_match('[/\\]', v:progpath[2]) 237 endif 238 239 " Only expect "vim" to appear in v:progname. 240 call assert_match('vim\c', v:progname) 241endfunc 242 243func Test_silent_ex_mode() 244 if !has('unix') || has('gui_running') 245 " can't get output of Vim. 246 return 247 endif 248 249 " This caused an ml_get error. 250 let out = system(GetVimCommand() . '-u NONE -es -c''set verbose=1|h|exe "%norm\<c-y>\<c-d>"'' -c cq') 251 call assert_notmatch('E315:', out) 252endfunc 253 254func Test_default_term() 255 if !has('unix') || has('gui_running') 256 " can't get output of Vim. 257 return 258 endif 259 260 let save_term = $TERM 261 let $TERM = 'unknownxxx' 262 let out = system(GetVimCommand() . ' -c''set term'' -c cq') 263 call assert_match("defaulting to 'ansi'", out) 264 let $TERM = save_term 265endfunc 266