vim: src/testdir/test_xxd.vim annotate

annotate src/testdir/test_xxd.vim @ 29206:a2c89e5446b7 v8.2.5122

patch 8.2.5122: lisp indenting my run over the end of the line Commit: https://github.com/vim/vim/commit/0e8e938d497260dd57be67b4966cb27a5f72376f Author: Bram Moolenaar <Bram@vim.org> Date: Sat Jun 18 12:51:11 2022 +0100 patch 8.2.5122: lisp indenting my run over the end of the line Problem: Lisp indenting my run over the end of the line. Solution: Check for NUL earlier.

author	Bram Moolenaar <Bram@vim.org>
date	Sat, 18 Jun 2022 14:00:04 +0200
parents	2f854597399f
children	948c947cb1ed

rev	line source
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	1 " Test for the xxd command
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 20784 diff changeset	2
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	3 if empty($XXD) && executable('..\xxd\xxd.exe')
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	4 let s:xxd_cmd = '..\xxd\xxd.exe'
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	5 elseif empty($XXD) \|\| !executable($XXD)
17089 8e9e9124c7a2 patch 8.1.1544: some balloon tests don't run when they can Bram Moolenaar <Bram@vim.org> parents: 17049 diff changeset	6 throw 'Skipped: xxd program missing'
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	7 else
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	8 let s:xxd_cmd = $XXD
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	9 endif
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	10
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 13963 diff changeset	11 func PrepareBuffer(lines)
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	12 new
b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	13 call append(0, a:lines)
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	14 $d
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	15 endfunc
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	16
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 13963 diff changeset	17 func s:Mess(counter)
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	18 return printf("Failed xxd test %d:", a:counter)
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	19 endfunc
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	20
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 13963 diff changeset	21 func Test_xxd()
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	22 call PrepareBuffer(range(1,30))
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	23 set ff=unix
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	24 w! XXDfile
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	25
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	26 " Test 1: simple, filter the result through xxd
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	27 let s:test = 1
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	28 exe '%!' . s:xxd_cmd . ' %'
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	29 let expected = [
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	30 \ '00000000: 310a 320a 330a 340a 350a 360a 370a 380a 1.2.3.4.5.6.7.8.',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	31 \ '00000010: 390a 3130 0a31 310a 3132 0a31 330a 3134 9.10.11.12.13.14',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	32 \ '00000020: 0a31 350a 3136 0a31 370a 3138 0a31 390a .15.16.17.18.19.',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	33 \ '00000030: 3230 0a32 310a 3232 0a32 330a 3234 0a32 20.21.22.23.24.2',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	34 \ '00000040: 350a 3236 0a32 370a 3238 0a32 390a 3330 5.26.27.28.29.30',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	35 \ '00000050: 0a .']
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	36 call assert_equal(expected, getline(1,'$'), s:Mess(s:test))
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	37
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	38 " Test 2: reverse the result
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	39 let s:test += 1
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	40 exe '%!' . s:xxd_cmd . ' -r'
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	41 call assert_equal(map(range(1,30), {v,c -> string(c)}), getline(1,'$'), s:Mess(s:test))
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	42
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	43 " Test 3: Skip the first 0x30 bytes
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	44 let s:test += 1
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	45 for arg in ['-s 0x30', '-s0x30', '-s+0x30', '-skip 0x030', '-seek 0x30', '-seek +0x30 --']
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	46 exe '%!' . s:xxd_cmd . ' ' . arg . ' %'
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	47 call assert_equal(expected[3:], getline(1,'$'), s:Mess(s:test))
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	48 endfor
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	49
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	50 " Test 4: Skip the first 30 bytes
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	51 let s:test += 1
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	52 for arg in ['-s -0x31', '-s-0x31']
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	53 exe '%!' . s:xxd_cmd . ' ' . arg . ' %'
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	54 call assert_equal(expected[2:], getline(1,'$'), s:Mess(s:test))
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	55 endfor
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	56
15647 f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	57 " The following tests use the xxd man page.
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	58 " For these tests to pass, the fileformat must be "unix".
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	59 let man_copy = 'Xxd.1'
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	60 let man_page = '../../runtime/doc/xxd.1'
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	61 if has('win32') && !filereadable(man_page)
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	62 let man_page = '../../doc/xxd.1'
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	63 endif
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	64 %d
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	65 exe '0r ' man_page '\| set ff=unix \| $d \| w' man_copy '\| bwipe!' man_copy
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	66
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	67 " Test 5: Print 120 bytes as continuous hexdump with 20 octets per line
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	68 let s:test += 1
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	69 %d
15647 f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	70 exe '0r! ' . s:xxd_cmd . ' -l 120 -ps -c20 ' . man_copy
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	71 $d
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	72 let expected = [
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	73 \ '2e54482058584420312022417567757374203139',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	74 \ '39362220224d616e75616c207061676520666f72',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	75 \ '20787864220a2e5c220a2e5c222032317374204d',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	76 \ '617920313939360a2e5c22204d616e2070616765',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	77 \ '20617574686f723a0a2e5c2220202020546f6e79',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	78 \ '204e7567656e74203c746f6e79407363746e7567']
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	79 call assert_equal(expected, getline(1,'$'), s:Mess(s:test))
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	80
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	81 " Test 6: Print the date from xxd.1
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	82 let s:test += 1
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	83 for arg in ['-l 13', '-l13', '-len 13']
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	84 %d
15647 f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	85 exe '0r! ' . s:xxd_cmd . ' -s 0x36 ' . arg . ' -cols 13 ' . man_copy
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	86 $d
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	87 call assert_equal('00000036: 3231 7374 204d 6179 2031 3939 36 21st May 1996', getline(1), s:Mess(s:test))
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	88 endfor
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	89
15647 f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	90 " Cleanup after tests 5 and 6
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	91 call delete(man_copy)
f7b88b1d3350 patch 8.1.0831: xxd test fails if man page has dos fileformat Bram Moolenaar <Bram@vim.org> parents: 15630 diff changeset	92
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	93 " Test 7: Print C include
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	94 let s:test += 1
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	95 call writefile(['TESTabcd09'], 'XXDfile')
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	96 %d
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	97 exe '0r! ' . s:xxd_cmd . ' -i XXDfile'
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	98 $d
16720 9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read Bram Moolenaar <Bram@vim.org> parents: 15647 diff changeset	99 let expected =<< trim [CODE]
17172 6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	100 unsigned char XXDfile[] = {
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	101 0x54, 0x45, 0x53, 0x54, 0x61, 0x62, 0x63, 0x64, 0x30, 0x39, 0x0a
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	102 };
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	103 unsigned int XXDfile_len = 11;
16720 9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read Bram Moolenaar <Bram@vim.org> parents: 15647 diff changeset	104 [CODE]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read Bram Moolenaar <Bram@vim.org> parents: 15647 diff changeset	105
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	106 call assert_equal(expected, getline(1,'$'), s:Mess(s:test))
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	107
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	108 " Test 8: Print C include capitalized
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	109 let s:test += 1
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	110 for arg in ['-C', '-capitalize']
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	111 call writefile(['TESTabcd09'], 'XXDfile')
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	112 %d
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	113 exe '0r! ' . s:xxd_cmd . ' -i ' . arg . ' XXDfile'
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	114 $d
16720 9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read Bram Moolenaar <Bram@vim.org> parents: 15647 diff changeset	115 let expected =<< trim [CODE]
17172 6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	116 unsigned char XXDFILE[] = {
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	117 0x54, 0x45, 0x53, 0x54, 0x61, 0x62, 0x63, 0x64, 0x30, 0x39, 0x0a
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	118 };
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	119 unsigned int XXDFILE_LEN = 11;
16720 9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read Bram Moolenaar <Bram@vim.org> parents: 15647 diff changeset	120 [CODE]
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	121 call assert_equal(expected, getline(1,'$'), s:Mess(s:test))
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	122 endfor
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	123
b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	124 " Test 9: Create a file with containing a single 'A'
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	125 let s:test += 1
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	126 call delete('XXDfile')
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	127 bwipe! XXDfile
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	128 if has('unix')
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	129 call system('echo "010000: 41"\|' . s:xxd_cmd . ' -r -s -0x10000 > XXDfile')
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	130 else
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	131 call writefile(['010000: 41'], 'Xinput')
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	132 silent exe '!' . s:xxd_cmd . ' -r -s -0x10000 < Xinput > XXDfile'
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	133 call delete('Xinput')
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	134 endif
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	135 call PrepareBuffer(readfile('XXDfile')[0])
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	136 call assert_equal('A', getline(1), s:Mess(s:test))
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	137 call delete('XXDfile')
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	138
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	139 " Test 10: group with 4 octets
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	140 let s:test += 1
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	141 for arg in ['-g 4', '-group 4', '-g4']
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	142 call writefile(['TESTabcd09'], 'XXDfile')
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	143 %d
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	144 exe '0r! ' . s:xxd_cmd . ' ' . arg . ' XXDfile'
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	145 $d
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	146 let expected = ['00000000: 54455354 61626364 30390a TESTabcd09.']
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	147 call assert_equal(expected, getline(1,'$'), s:Mess(s:test))
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	148 call delete('XXDfile')
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	149 endfor
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	150
15630 db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	151 " Test 11: reverse with CR, hex upper, Postscript style with a TAB
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	152 let s:test += 1
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	153 call writefile([" 54455354\t610B6364 30390A TESTa\0x0bcd09.\r"], 'Xinput')
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	154 silent exe '!' . s:xxd_cmd . ' -r -p < Xinput > XXDfile'
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	155 let blob = readfile('XXDfile', 'B')
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	156 call assert_equal(0z54455354.610B6364.30390A, blob)
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	157 call delete('Xinput')
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	158 call delete('XXDfile')
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	159
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	160 " Test 12: reverse with seek
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	161 let s:test += 1
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	162 call writefile(["00000000: 54455354\t610B6364 30390A TESTa\0x0bcd09.\r"], 'Xinput')
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	163 silent exe '!' . s:xxd_cmd . ' -r -seek 5 < Xinput > XXDfile'
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	164 let blob = readfile('XXDfile', 'B')
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	165 call assert_equal(0z0000000000.54455354.610B6364.30390A, blob)
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	166 call delete('Xinput')
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	167 call delete('XXDfile')
db6cfc44eb65 patch 8.1.0823: not sufficient testing of xxd Bram Moolenaar <Bram@vim.org> parents: 15627 diff changeset	168
20601 75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	169 " Test 13: simple, decimal offset
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	170 call PrepareBuffer(range(1,30))
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	171 set ff=unix
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	172 w! XXDfile
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	173 let s:test += 1
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	174 exe '%!' . s:xxd_cmd . ' -d %'
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	175 let expected = [
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	176 \ '00000000: 310a 320a 330a 340a 350a 360a 370a 380a 1.2.3.4.5.6.7.8.',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	177 \ '00000016: 390a 3130 0a31 310a 3132 0a31 330a 3134 9.10.11.12.13.14',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	178 \ '00000032: 0a31 350a 3136 0a31 370a 3138 0a31 390a .15.16.17.18.19.',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	179 \ '00000048: 3230 0a32 310a 3232 0a32 330a 3234 0a32 20.21.22.23.24.2',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	180 \ '00000064: 350a 3236 0a32 370a 3238 0a32 390a 3330 5.26.27.28.29.30',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	181 \ '00000080: 0a .']
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	182 call assert_equal(expected, getline(1,'$'), s:Mess(s:test))
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	183
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	184 " Test 14: grouping with -d
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	185 let s:test += 1
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	186 let expected = [
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	187 \ '00000000: 310a320a 330a340a 350a360a 370a380a 1.2.3.4.5.6.7.8.',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	188 \ '00000016: 390a3130 0a31310a 31320a31 330a3134 9.10.11.12.13.14',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	189 \ '00000032: 0a31350a 31360a31 370a3138 0a31390a .15.16.17.18.19.',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	190 \ '00000048: 32300a32 310a3232 0a32330a 32340a32 20.21.22.23.24.2',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	191 \ '00000064: 350a3236 0a32370a 32380a32 390a3330 5.26.27.28.29.30',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	192 \ '00000080: 0a .']
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	193 for arg in ['-g 4', '-group 4', '-g4']
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	194 exe '%!' . s:xxd_cmd . ' ' . arg . ' -d %'
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	195 call assert_equal(expected, getline(1,'$'), s:Mess(s:test))
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	196 endfor
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	197
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	198 " Test 15: cols with decimal offset: -c 21 -d
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	199 let s:test += 1
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	200 let expected = [
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	201 \ '00000000: 310a 320a 330a 340a 350a 360a 370a 380a 390a 3130 0a 1.2.3.4.5.6.7.8.9.10.',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	202 \ '00000021: 3131 0a31 320a 3133 0a31 340a 3135 0a31 360a 3137 0a 11.12.13.14.15.16.17.',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	203 \ '00000042: 3138 0a31 390a 3230 0a32 310a 3232 0a32 330a 3234 0a 18.19.20.21.22.23.24.',
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	204 \ '00000063: 3235 0a32 360a 3237 0a32 380a 3239 0a33 300a 25.26.27.28.29.30.']
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	205 exe '%!' . s:xxd_cmd . ' -c 21 -d %'
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	206 call assert_equal(expected, getline(1,'$'), s:Mess(s:test))
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number Bram Moolenaar <Bram@vim.org> parents: 17172 diff changeset	207
27102 4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	208 " Test 16: -o -offset
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	209 let s:test += 1
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	210 let expected = [
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	211 \ '0000000f: 310a 320a 330a 340a 350a 360a 370a 380a 1.2.3.4.5.6.7.8.',
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	212 \ '0000001f: 390a 3130 0a31 310a 3132 0a31 330a 3134 9.10.11.12.13.14',
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	213 \ '0000002f: 0a31 350a 3136 0a31 370a 3138 0a31 390a .15.16.17.18.19.',
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	214 \ '0000003f: 3230 0a32 310a 3232 0a32 330a 3234 0a32 20.21.22.23.24.2',
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	215 \ '0000004f: 350a 3236 0a32 370a 3238 0a32 390a 3330 5.26.27.28.29.30',
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	216 \ '0000005f: 0a .']
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	217 for arg in ['-o 15', '-offset 15', '-o15']
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	218 exe '%!' . s:xxd_cmd . ' ' . arg . ' %'
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	219 call assert_equal(expected, getline(1,'$'), s:Mess(s:test))
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	220 endfor
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	221
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	222 %d
20784 d7d6993fc266 patch 8.2.0944: xxd test leaves file behind Bram Moolenaar <Bram@vim.org> parents: 20601 diff changeset	223 bwipe!
d7d6993fc266 patch 8.2.0944: xxd test leaves file behind Bram Moolenaar <Bram@vim.org> parents: 20601 diff changeset	224 call delete('XXDfile')
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	225 endfunc
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	226
26036 c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	227 func Test_xxd_patch()
26038 542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	228 let cmd1 = 'silent !' .. s:xxd_cmd .. ' -r Xxxdin Xxxdfile'
542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	229 let cmd2 = 'silent !' .. s:xxd_cmd .. ' -g1 Xxxdfile > Xxxdout'
26036 c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	230 call writefile(["2: 41 41", "8: 42 42"], 'Xxxdin')
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	231 call writefile(['::::::::'], 'Xxxdfile')
26038 542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	232 exe cmd1
542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	233 exe cmd2
26036 c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	234 call assert_equal(['00000000: 3a 3a 41 41 3a 3a 3a 3a 42 42 ::AA::::BB'], readfile('Xxxdout'))
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	235
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	236 call writefile(["2: 43 43 ", "8: 44 44"], 'Xxxdin')
26038 542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	237 exe cmd1
542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	238 exe cmd2
26036 c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	239 call assert_equal(['00000000: 3a 3a 43 43 3a 3a 3a 3a 44 44 ::CC::::DD'], readfile('Xxxdout'))
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	240
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	241 call writefile(["2: 45 45 ", "8: 46 46"], 'Xxxdin')
26038 542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	242 exe cmd1
542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	243 exe cmd2
26036 c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	244 call assert_equal(['00000000: 3a 3a 45 45 3a 3a 3a 3a 46 46 ::EE::::FF'], readfile('Xxxdout'))
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	245
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	246 call writefile(["2: 41 41", "08: 42 42"], 'Xxxdin')
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	247 call writefile(['::::::::'], 'Xxxdfile')
26038 542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	248 exe cmd1
542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	249 exe cmd2
26036 c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	250 call assert_equal(['00000000: 3a 3a 41 41 3a 3a 3a 3a 42 42 ::AA::::BB'], readfile('Xxxdout'))
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	251
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	252 call writefile(["2: 43 43 ", "09: 44 44"], 'Xxxdin')
26038 542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	253 exe cmd1
542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	254 exe cmd2
26036 c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	255 call assert_equal(['00000000: 3a 3a 43 43 3a 3a 3a 3a 42 44 44 ::CC::::BDD'], readfile('Xxxdout'))
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	256
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	257 call writefile(["2: 45 45 ", "0a: 46 46"], 'Xxxdin')
26038 542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	258 exe cmd1
542cc55a660b patch 8.2.3553: xxd test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 26036 diff changeset	259 exe cmd2
26036 c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	260 call assert_equal(['00000000: 3a 3a 45 45 3a 3a 3a 3a 42 44 46 46 ::EE::::BDFF'], readfile('Xxxdout'))
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	261
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	262 call delete('Xxxdin')
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	263 call delete('Xxxdfile')
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	264 call delete('Xxxdout')
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	265 endfunc
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly Bram Moolenaar <Bram@vim.org> parents: 25076 diff changeset	266
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	267 " Various ways with wrong arguments that trigger the usage output.
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	268 func Test_xxd_usage()
27102 4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	269 for arg in ['-h', '-c', '-g', '-o', '-s', '-l', '-X', 'one two three']
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	270 new
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	271 exe 'r! ' . s:xxd_cmd . ' ' . arg
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	272 call assert_match("Usage:", join(getline(1, 3)))
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	273 bwipe!
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	274 endfor
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	275 endfunc
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	276
26254 3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	277 func Test_xxd_ignore_garbage()
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	278 new
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	279 exe 'r! printf "\n\r xxxx 0: 42 42" \| ' . s:xxd_cmd . ' -r'
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	280 call assert_match('BB', join(getline(1, 3)))
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	281 bwipe!
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	282 endfunc
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	283
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	284 func Test_xxd_bit_dump()
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	285 new
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	286 exe 'r! printf "123456" \| ' . s:xxd_cmd . ' -b1'
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	287 call assert_match('00000000: 00110001 00110010 00110011 00110100 00110101 00110110 123456', join(getline(1, 3)))
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	288 bwipe!
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	289 endfunc
3a13efec0016 patch 8.2.3658: duplicate code in xxd Bram Moolenaar <Bram@vim.org> parents: 26038 diff changeset	290
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	291 func Test_xxd_version()
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	292 new
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	293 exe 'r! ' . s:xxd_cmd . ' -v'
25076 5690cf66ee07 patch 8.2.3075: xxd always reports an old version string Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	294 call assert_match('xxd 20\d\d-\d\d-\d\d by Juergen Weigert et al\.', join(getline(1, 3)))
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	295 bwipe!
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	296 endfunc
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 20784 diff changeset	297
27102 4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	298 " number of columns must be non-negative
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	299 func Test_xxd_min_cols()
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	300 for cols in ['-c-1', '-c -1', '-cols -1']
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	301 for fmt in ['', '-b', '-e', '-i', '-p', ]
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	302 new
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	303 exe 'r! printf "ignored" \| ' . s:xxd_cmd . ' ' . cols . ' ' . fmt
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	304 call assert_match("invalid number of columns", join(getline(1, '$')))
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	305 bwipe!
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	306 endfor
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	307 endfor
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	308 endfunc
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	309
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	310 " some hex formats limit columns to 256 (a #define in xxd.c)
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	311 func Test_xxd_max_cols()
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	312 for cols in ['-c257', '-c 257', '-cols 257']
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	313 for fmt in ['', '-b', '-e' ]
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	314 new
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	315 exe 'r! printf "ignored" \| ' . s:xxd_cmd . ' ' . cols . ' ' . fmt
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	316 call assert_match("invalid number of columns", join(getline(1, '$')))
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	317 bwipe!
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	318 endfor
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	319 endfor
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	320 endfunc
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	321
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	322 " -c0 selects the format specific default column value, as if no -c was given
27118 2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	323 " except for -ps, where it disables extra newlines
27102 4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	324 func Test_xxd_c0_is_def_cols()
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	325 call writefile(["abcdefghijklmnopqrstuvwxyz0123456789"], 'Xxdin')
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	326 for cols in ['-c0', '-c 0', '-cols 0']
27118 2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	327 for fmt in ['', '-b', '-e', '-i']
27102 4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	328 exe 'r! ' . s:xxd_cmd . ' ' . fmt ' Xxdin > Xxdout1'
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	329 exe 'r! ' . s:xxd_cmd . ' ' . cols . ' ' . fmt ' Xxdin > Xxdout2'
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	330 call assert_equalfile('Xxdout1', 'Xxdout2')
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	331 endfor
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	332 endfor
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	333 call delete('Xxdin')
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	334 call delete('Xxdout1')
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	335 call delete('Xxdout2')
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	336 endfunc
4061623aa316 patch 8.2.4080: not sufficient test coverage for xxd Bram Moolenaar <Bram@vim.org> parents: 26254 diff changeset	337
27118 2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	338 " all output in a single line for -c0 -ps
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	339 func Test_xxd_plain_one_line()
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	340 call writefile([
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	341 \ "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789",
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	342 \ "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789",
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	343 \ "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789",
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	344 \ "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789",
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	345 \ "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789",
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	346 \ "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789"],
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	347 \ 'Xxdin')
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	348 for cols in ['-c0', '-c 0', '-cols 0']
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	349 exe 'r! ' . s:xxd_cmd . ' -ps ' . cols ' Xxdin'
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	350 " output seems to start in line 2
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	351 let out = join(getline(2, '$'))
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	352 bwipe!
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	353 " newlines in xxd output result in spaces in the string variable out
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	354 call assert_notmatch(" ", out)
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	355 " xxd output must be non-empty and comprise only lower case hex digits
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	356 call assert_match("^[0-9a-f][0-9a-f]*$", out)
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	357 endfor
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	358 call delete('Xxdin')
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	359 endfunc
2f854597399f patch 8.2.4088: xxd cannot output everything in one line Bram Moolenaar <Bram@vim.org> parents: 27102 diff changeset	360
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 20784 diff changeset	361 " vim: shiftwidth=2 sts=2 expandtab

Mercurial > vim

annotate src/testdir/test_xxd.vim @ 29206:a2c89e5446b7 v8.2.5122