| Bram Moolenaar | c525e3a | 2017-02-18 16:59:02 +0100 | [diff] [blame] | 1 | " Test :recover |
| 2 | |
| 3 | func Test_recover_root_dir() |
| 4 | " This used to access invalid memory. |
| 5 | split Xtest |
| 6 | set dir=/ |
| 7 | call assert_fails('recover', 'E305:') |
| 8 | close! |
| 9 | |
| Bram Moolenaar | 2a0b06d | 2017-05-18 16:23:43 +0200 | [diff] [blame] | 10 | if has('win32') || filewritable('/') == 2 |
| Bram Moolenaar | 8034520 | 2017-02-18 22:43:19 +0100 | [diff] [blame] | 11 | " can write in / directory on MS-Windows |
| 12 | set dir=/notexist/ |
| 13 | endif |
| Bram Moolenaar | c525e3a | 2017-02-18 16:59:02 +0100 | [diff] [blame] | 14 | call assert_fails('split Xtest', 'E303:') |
| Bram Moolenaar | 00e192b | 2019-10-19 17:01:28 +0200 | [diff] [blame] | 15 | |
| 16 | " No error with empty 'directory' setting. |
| 17 | set directory= |
| 18 | split XtestOK |
| 19 | close! |
| 20 | |
| Bram Moolenaar | c525e3a | 2017-02-18 16:59:02 +0100 | [diff] [blame] | 21 | set dir& |
| 22 | endfunc |
| 23 | |
| Bram Moolenaar | 4a6fcf8 | 2017-10-12 21:29:22 +0200 | [diff] [blame] | 24 | " Inserts 10000 lines with text to fill the swap file with two levels of pointer |
| 25 | " blocks. Then recovers from the swap file and checks all text is restored. |
| 26 | " |
| 27 | " We need about 10000 lines of 100 characters to get two levels of pointer |
| 28 | " blocks. |
| 29 | func Test_swap_file() |
| Bram Moolenaar | 67418d9 | 2017-10-15 22:07:39 +0200 | [diff] [blame] | 30 | set fileformat=unix undolevels=-1 |
| Bram Moolenaar | 4a6fcf8 | 2017-10-12 21:29:22 +0200 | [diff] [blame] | 31 | edit! Xtest |
| 32 | let text = "\tabcdefghijklmnoparstuvwxyz0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijklmnoparstuvwxyz0123456789" |
| 33 | let i = 1 |
| 34 | let linecount = 10000 |
| 35 | while i <= linecount |
| 36 | call append(i - 1, i . text) |
| 37 | let i += 1 |
| 38 | endwhile |
| 39 | $delete |
| 40 | preserve |
| 41 | " get the name of the swap file |
| 42 | let swname = split(execute("swapname"))[0] |
| 43 | let swname = substitute(swname, '[[:blank:][:cntrl:]]*\(.\{-}\)[[:blank:][:cntrl:]]*$', '\1', '') |
| 44 | " make a copy of the swap file in Xswap |
| 45 | set binary |
| 46 | exe 'sp ' . swname |
| 47 | w! Xswap |
| 48 | set nobinary |
| 49 | new |
| 50 | only! |
| 51 | bwipe! Xtest |
| 52 | call rename('Xswap', swname) |
| 53 | recover Xtest |
| 54 | call delete(swname) |
| 55 | let linedollar = line('$') |
| 56 | call assert_equal(linecount, linedollar) |
| 57 | if linedollar < linecount |
| 58 | let linecount = linedollar |
| 59 | endif |
| 60 | let i = 1 |
| 61 | while i <= linecount |
| 62 | call assert_equal(i . text, getline(i)) |
| 63 | let i += 1 |
| 64 | endwhile |
| 65 | |
| 66 | set undolevels& |
| 67 | enew! | only |
| 68 | endfunc |
| Bram Moolenaar | 6d91bcb | 2020-08-12 18:50:36 +0200 | [diff] [blame] | 69 | |
| 70 | " vim: shiftwidth=2 sts=2 expandtab |