test_scriptnames.vim (3532B)
1 " Test for the :scriptnames command 2 func Test_scriptnames() 3 call writefile(['let did_load_script = 123'], 'Xscripting', 'D') 4 source Xscripting 5 call assert_equal(123, g:did_load_script) 6 7 let scripts = split(execute('scriptnames'), "\n") 8 let last = scripts[-1] 9 call assert_match('\<Xscripting\>', last) 10 let lastnr = substitute(last, '\D*\(\d\+\):.*', '\1', '') 11 exe 'script ' . lastnr 12 call assert_equal('Xscripting', expand('%:t')) 13 14 call assert_fails('script ' . (lastnr + 1), 'E474:') 15 call assert_fails('script 0', 'E939:') 16 17 new 18 call setline(1, 'nothing') 19 call assert_fails('script ' . lastnr, 'E37:') 20 exe 'script! ' . lastnr 21 call assert_equal('Xscripting', expand('%:t')) 22 23 bwipe 24 25 let msgs = execute('messages') 26 scriptnames 27 call assert_equal(msgs, execute('messages')) 28 endfunc 29 30 " Test for the getscriptinfo() function 31 func Test_getscriptinfo() 32 let lines =<< trim END 33 " scriptversion 3 34 let g:loaded_script_id = expand("<SID>") 35 let s:XscriptVar = [1, #{v: 2}] 36 func s:XgetScriptVar() 37 return s:XscriptVar 38 endfunc 39 func s:Xscript_legacy_func1() 40 endfunc 41 " def s:Xscript_def_func1() 42 " enddef 43 func Xscript_legacy_func2() 44 endfunc 45 " def Xscript_def_func2() 46 " enddef 47 END 48 call writefile(lines, 'X22script91', 'D') 49 source X22script91 50 let l = getscriptinfo() 51 call assert_match('X22script91$', l[-1].name) 52 call assert_equal(g:loaded_script_id, $"<SNR>{l[-1].sid}_") 53 " call assert_equal(3, l[-1].version) 54 call assert_equal(1, l[-1].version) 55 call assert_equal(0, has_key(l[-1], 'variables')) 56 call assert_equal(0, has_key(l[-1], 'functions')) 57 58 " Get script information using script name 59 let l = getscriptinfo(#{name: '22script91'}) 60 call assert_equal(1, len(l)) 61 call assert_match('22script91$', l[0].name) 62 let sid = l[0].sid 63 64 " Get script information using script-ID 65 let l = getscriptinfo({'sid': sid}) 66 call assert_equal(#{XscriptVar: [1, {'v': 2}]}, l[0].variables) 67 let funcs = ['Xscript_legacy_func2', 68 \ $"<SNR>{sid}_Xscript_legacy_func1", 69 "\ $"<SNR>{sid}_Xscript_def_func1", 70 "\ 'Xscript_def_func2', 71 \ $"<SNR>{sid}_XgetScriptVar"] 72 for f in funcs 73 call assert_true(index(l[0].functions, f) != -1) 74 endfor 75 76 " Verify that a script-local variable cannot be modified using the dict 77 " returned by getscriptinfo() 78 let l[0].variables.XscriptVar = ['n'] 79 let funcname = $"<SNR>{sid}_XgetScriptVar" 80 call assert_equal([1, {'v': 2}], call(funcname, [])) 81 82 let l = getscriptinfo({'name': 'foobar'}) 83 call assert_equal(0, len(l)) 84 let l = getscriptinfo({'name': ''}) 85 call assert_true(len(l) > 1) 86 87 call assert_fails("echo getscriptinfo({'name': []})", 'E730:') 88 call assert_fails("echo getscriptinfo({'name': '\\@'})", 'E866:') 89 let l = getscriptinfo({'name': v:_null_string}) 90 call assert_true(len(l) > 1) 91 call assert_fails("echo getscriptinfo('foobar')", 'E1206:') 92 93 call assert_fails("echo getscriptinfo({'sid': []})", 'E745:') 94 call assert_fails("echo getscriptinfo({'sid': {}})", 'E728:') 95 call assert_fails("echo getscriptinfo({'sid': 0})", 'E475:') 96 call assert_fails("echo getscriptinfo({'sid': -1})", 'E475:') 97 call assert_fails("echo getscriptinfo({'sid': -999})", 'E475:') 98 99 echo getscriptinfo({'sid': '1'}) 100 " call assert_fails("vim9cmd echo getscriptinfo({'sid': '1'})", 'E1030:') 101 102 let max_sid = max(map(getscriptinfo(), { k, v -> v.sid })) 103 call assert_equal([], getscriptinfo({'sid': max_sid + 1})) 104 endfunc 105 106 " vim: shiftwidth=2 sts=2 expandtab