| Bram Moolenaar | 40e6a71 | 2010-05-16 22:32:54 +0200 | [diff] [blame] | 1 | Test for encryption. |
| Bram Moolenaar | 72fe56f | 2013-07-01 21:00:35 +0200 | [diff] [blame] | 2 | The test data is in another file to avoid problems with 'encoding', especially |
| 3 | cp932. |
| Bram Moolenaar | 40e6a71 | 2010-05-16 22:32:54 +0200 | [diff] [blame] | 4 | |
| 5 | STARTTEST |
| 6 | :so small.vim |
| Bram Moolenaar | 72fe56f | 2013-07-01 21:00:35 +0200 | [diff] [blame] | 7 | :set enc=latin1 |
| 8 | :bwipe! |
| 9 | :r test71a.in |
| Bram Moolenaar | f50a253 | 2010-05-21 15:36:08 +0200 | [diff] [blame] | 10 | :/^start of text/+1 |
| 11 | :let text_lines = getline('.', line('.') + 2) |
| Bram Moolenaar | 49771f4 | 2010-07-20 17:32:38 +0200 | [diff] [blame] | 12 | :/^start of cm=zip bytes/+1 |
| Bram Moolenaar | f50a253 | 2010-05-21 15:36:08 +0200 | [diff] [blame] | 13 | :let cm0_bytes = getline('.', '.') |
| Bram Moolenaar | 49771f4 | 2010-07-20 17:32:38 +0200 | [diff] [blame] | 14 | :/^start of cm=blowfish bytes/+1 |
| Bram Moolenaar | f50a253 | 2010-05-21 15:36:08 +0200 | [diff] [blame] | 15 | :let cm1_bytes = getline('.', '.') |
| Bram Moolenaar | d73895e | 2013-06-19 21:17:31 +0200 | [diff] [blame] | 16 | :bwipe! |
| Bram Moolenaar | f50a253 | 2010-05-21 15:36:08 +0200 | [diff] [blame] | 17 | :call append(0, text_lines) |
| Bram Moolenaar | 40e6a71 | 2010-05-16 22:32:54 +0200 | [diff] [blame] | 18 | :$d |
| 19 | :X |
| 20 | foobar |
| 21 | foobar |
| 22 | :w! Xtestfile |
| 23 | :bwipe! |
| 24 | :e Xtestfile |
| 25 | foobar |
| Bram Moolenaar | f50a253 | 2010-05-21 15:36:08 +0200 | [diff] [blame] | 26 | :let cm0_read_back = getline('.', '$') |
| Bram Moolenaar | 40e6a71 | 2010-05-16 22:32:54 +0200 | [diff] [blame] | 27 | :set key= |
| Bram Moolenaar | 49771f4 | 2010-07-20 17:32:38 +0200 | [diff] [blame] | 28 | :set cryptmethod=blowfish |
| 29 | :" If the blowfish test fails 'cryptmethod' will be 'zip' now. |
| 30 | :%s/^/\=&cryptmethod == 'blowfish' ? "OK " : "blowfish test failed "/ |
| Bram Moolenaar | 40e6a71 | 2010-05-16 22:32:54 +0200 | [diff] [blame] | 31 | :X |
| 32 | barfoo |
| 33 | barfoo |
| 34 | :w! Xtestfile |
| 35 | :bwipe! |
| 36 | :e Xtestfile |
| 37 | barfoo |
| Bram Moolenaar | f50a253 | 2010-05-21 15:36:08 +0200 | [diff] [blame] | 38 | :let cm1_read_back = getline('.', '$') |
| 39 | :bwipe! |
| 40 | :set bin noeol key= |
| 41 | :call append(0, cm0_bytes) |
| 42 | :$d |
| 43 | :set fenc=latin1 |
| 44 | :w! Xtestfile |
| 45 | :bwipe! |
| 46 | :set nobin |
| 47 | :e Xtestfile |
| 48 | foofoo |
| 49 | :let cm0_read_bin = getline('.', '$') |
| 50 | :bwipe! |
| 51 | :set bin noeol key= |
| 52 | :call append(0, cm1_bytes) |
| 53 | :$d |
| 54 | :set fenc=latin1 |
| 55 | :w! Xtestfile |
| 56 | :bwipe! |
| 57 | :set nobin |
| 58 | :e Xtestfile |
| 59 | barbar |
| 60 | :call append(0, cm0_read_bin) |
| 61 | :call append(0, cm1_read_back) |
| 62 | :call append(0, cm0_read_back) |
| 63 | :set key= fenc=latin1 |
| Bram Moolenaar | 40e6a71 | 2010-05-16 22:32:54 +0200 | [diff] [blame] | 64 | :w! test.out |
| 65 | :qa! |
| 66 | ENDTEST |
| 67 | |