Mercurial > vim
view src/testdir/test_memory_usage.vim @ 16322:eb2fd769175f v8.1.1166
patch 8.1.1166: gettitle test can still fail when another Vim is running
commit https://github.com/vim/vim/commit/9c35d05f45e545825a15da07cc2f1c893c3789ee
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Apr 13 20:39:15 2019 +0200
patch 8.1.1166: gettitle test can still fail when another Vim is running
Problem: Gettitle test can still fail when another Vim is running.
Solution: Accept any server name number. (Dominique Pelle, closes https://github.com/vim/vim/issues/4252)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sat, 13 Apr 2019 20:45:04 +0200 |
parents | b951bea7d11e |
children | 0baa4c7e057f |
line wrap: on
line source
" Tests for memory usage. if !has('terminal') || has('gui_running') || $ASAN_OPTIONS !=# '' " Skip tests on Travis CI ASAN build because it's difficult to estimate " memory usage. finish endif source shared.vim func s:pick_nr(str) abort return substitute(a:str, '[^0-9]', '', 'g') * 1 endfunc if has('win32') if !executable('wmic') finish endif func s:memory_usage(pid) abort let cmd = printf('wmic process where processid=%d get WorkingSetSize', a:pid) return s:pick_nr(system(cmd)) / 1024 endfunc elseif has('unix') if !executable('ps') finish endif func s:memory_usage(pid) abort return s:pick_nr(system('ps -o rss= -p ' . a:pid)) endfunc else finish endif " Wait for memory usage to level off. func s:monitor_memory_usage(pid) abort let proc = {} let proc.pid = a:pid let proc.hist = [] let proc.max = 0 func proc.op() abort " Check the last 200ms. let val = s:memory_usage(self.pid) if self.max < val let self.max = val endif call add(self.hist, val) if len(self.hist) < 20 return 0 endif let sample = remove(self.hist, 0) return len(uniq([sample] + self.hist)) == 1 endfunc call WaitFor({-> proc.op()}, 10000) return {'last': get(proc.hist, -1), 'max': proc.max} endfunc let s:term_vim = {} func s:term_vim.start(...) abort let self.buf = term_start([GetVimProg()] + a:000) let self.job = term_getjob(self.buf) call WaitFor({-> job_status(self.job) ==# 'run'}) let self.pid = job_info(self.job).process endfunc func s:term_vim.stop() abort call term_sendkeys(self.buf, ":qall!\<CR>") call WaitFor({-> job_status(self.job) ==# 'dead'}) exe self.buf . 'bwipe!' endfunc func s:vim_new() abort return copy(s:term_vim) endfunc func Test_memory_func_capture_vargs() " Case: if a local variable captures a:000, funccall object will be free " just after it finishes. let testfile = 'Xtest.vim' call writefile([ \ 'func s:f(...)', \ ' let x = a:000', \ 'endfunc', \ 'for _ in range(10000)', \ ' call s:f(0)', \ 'endfor', \ ], testfile) let vim = s:vim_new() call vim.start('--clean', '-c', 'set noswapfile', testfile) let before = s:monitor_memory_usage(vim.pid).last call term_sendkeys(vim.buf, ":so %\<CR>") call WaitFor({-> term_getcursor(vim.buf)[0] == 1}) let after = s:monitor_memory_usage(vim.pid) " Estimate the limit of max usage as 2x initial usage. " The lower limit can fluctuate a bit, use 98%. call assert_inrange(before * 98 / 100, 2 * before, after.max) " In this case, garbage collecting is not needed. " The value might fluctuate a bit, allow for 3% tolerance. let lower = after.last * 97 / 100 let upper = after.last * 103 / 100 call assert_inrange(lower, upper, after.max) call vim.stop() call delete(testfile) endfunc func Test_memory_func_capture_lvars() " Case: if a local variable captures l: dict, funccall object will not be " free until garbage collector runs, but after that memory usage doesn't " increase so much even when rerun Xtest.vim since system memory caches. let testfile = 'Xtest.vim' call writefile([ \ 'func s:f()', \ ' let x = l:', \ 'endfunc', \ 'for _ in range(10000)', \ ' call s:f()', \ 'endfor', \ ], testfile) let vim = s:vim_new() call vim.start('--clean', '-c', 'set noswapfile', testfile) let before = s:monitor_memory_usage(vim.pid).last call term_sendkeys(vim.buf, ":so %\<CR>") call WaitFor({-> term_getcursor(vim.buf)[0] == 1}) let after = s:monitor_memory_usage(vim.pid) " Rerun Xtest.vim. for _ in range(3) call term_sendkeys(vim.buf, ":so %\<CR>") call WaitFor({-> term_getcursor(vim.buf)[0] == 1}) let last = s:monitor_memory_usage(vim.pid).last endfor " The usage may be a bit less than the last value, use 80%. " Allow for 20% tolerance at the upper limit. That's very permissive, but " otherwise the test fails sometimes. let lower = before * 8 / 10 let upper = (after.max + (after.last - before)) * 12 / 10 call assert_inrange(lower, upper, last) call vim.stop() call delete(testfile) endfunc