vim: src/testdir/test_xxd.vim annotate

annotate src/testdir/test_xxd.vim @ 15627:11879b89bb69 v8.1.0821

patch 8.1.0821: xxd "usage" output and other arguments not tested commit https://github.com/vim/vim/commit/970f5d39f27717b1a529b7b250a8ed7c3f791949 Author: Bram Moolenaar <Bram@vim.org> Date: Fri Jan 25 21:52:17 2019 +0100 patch 8.1.0821: xxd "usage" output and other arguments not tested Problem: Xxd "usage" output and other arguments not tested. Solution: Add a test to trigger the usage output in various ways. Fix uncovered problem.

author	Bram Moolenaar <Bram@vim.org>
date	Fri, 25 Jan 2019 22:00:15 +0100
parents	63b02fcf1361
children	db6cfc44eb65

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
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	2 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	3 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	4 elseif empty($XXD) \|\| !executable($XXD)
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	5 finish
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	6 else
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	7 let s:xxd_cmd = $XXD
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	8 endif
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	9
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 13963 diff changeset	10 func PrepareBuffer(lines)
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	11 new
b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	12 call append(0, a:lines)
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	13 $d
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	14 endfunc
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	15
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 13963 diff changeset	16 func s:Mess(counter)
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	17 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	18 endfunc
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	19
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 13963 diff changeset	20 func Test_xxd()
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	21 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	22 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	23 w! XXDfile
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	24
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	25 " 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	26 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	27 exe '%!' . s:xxd_cmd . ' %'
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	28 let expected = [
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	29 \ '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	30 \ '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	31 \ '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	32 \ '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	33 \ '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	34 \ '00000050: 0a .']
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	35 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	36
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	37 " Test 2: reverse the result
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	38 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	39 exe '%!' . s:xxd_cmd . ' -r'
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	40 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	41
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	42 " 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	43 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	44 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	45 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	46 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	47 endfor
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	48
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	49 " Test 4: Skip the first 30 bytes
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	50 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	51 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	52 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	53 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	54 endfor
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	55
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	56 " 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	57 let s:test += 1
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	58 %d
13963 1174611ad715 Vim 8.1 release Christian Brabandt <cb@256bit.org> parents: 13646 diff changeset	59 let fname = '../../runtime/doc/xxd.1'
1174611ad715 Vim 8.1 release Christian Brabandt <cb@256bit.org> parents: 13646 diff changeset	60 if has('win32') && !filereadable(fname)
1174611ad715 Vim 8.1 release Christian Brabandt <cb@256bit.org> parents: 13646 diff changeset	61 let fname = '../../doc/xxd.1'
1174611ad715 Vim 8.1 release Christian Brabandt <cb@256bit.org> parents: 13646 diff changeset	62 endif
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	63 exe '0r! ' . s:xxd_cmd . ' -l 120 -ps -c20 ' . fname
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	64 $d
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	65 let expected = [
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	66 \ '2e54482058584420312022417567757374203139',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	67 \ '39362220224d616e75616c207061676520666f72',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	68 \ '20787864220a2e5c220a2e5c222032317374204d',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	69 \ '617920313939360a2e5c22204d616e2070616765',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	70 \ '20617574686f723a0a2e5c2220202020546f6e79',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	71 \ '204e7567656e74203c746f6e79407363746e7567']
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	72 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	73
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	74 " 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	75 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	76 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	77 %d
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	78 exe '0r! ' . s:xxd_cmd . ' -s 0x36 -l 13 -cols 13 ' . fname
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	79 $d
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	80 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	81 endfor
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	82
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	83 " Test 7: Print C include
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	84 let s:test += 1
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	85 call writefile(['TESTabcd09'], 'XXDfile')
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	86 %d
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	87 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	88 $d
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	89 let expected = ['unsigned char XXDfile[] = {',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	90 \ ' 0x54, 0x45, 0x53, 0x54, 0x61, 0x62, 0x63, 0x64, 0x30, 0x39, 0x0a', '};',
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	91 \ 'unsigned int XXDfile_len = 11;']
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	92 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	93
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	94 " Test 8: Print C include capitalized
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	95 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	96 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	97 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	98 %d
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	99 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	100 $d
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	101 let expected = ['unsigned char XXDFILE[] = {',
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	102 \ ' 0x54, 0x45, 0x53, 0x54, 0x61, 0x62, 0x63, 0x64, 0x30, 0x39, 0x0a', '};',
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	103 \ 'unsigned int XXDFILE_LEN = 11;']
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	104 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	105 endfor
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	106
b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	107 " 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	108 let s:test += 1
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	109 call delete('XXDfile')
13638 b3068807f5df patch 8.0.1691: xxd test sometimes fails Christian Brabandt <cb@256bit.org> parents: 13634 diff changeset	110 bwipe! XXDfile
13646 86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	111 if has('unix')
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	112 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	113 else
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	114 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	115 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	116 call delete('Xinput')
86eb21bb5920 patch 8.0.1695: xxd test not run on MS-Windows Christian Brabandt <cb@256bit.org> parents: 13638 diff changeset	117 endif
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	118 call PrepareBuffer(readfile('XXDfile')[0])
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	119 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	120 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	121
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	122 " 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	123 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	124 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	125 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	126 %d
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	127 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	128 $d
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	129 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	130 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	131 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	132 endfor
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	133
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	134 " TODO:
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	135 " -o -offset
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	136
13634 2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	137 %d
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	138 bw!
2678e38e1de6 patch 8.0.1689: no tests for xxd Christian Brabandt <cb@256bit.org> parents: diff changeset	139 endfunc
15627 11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	140
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	141 " 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	142 func Test_xxd_usage()
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	143 for arg in ['-c', '-g', '-o', '-s', '-l', '-X', 'one two three']
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	144 new
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	145 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	146 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	147 bwipe!
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	148 endfor
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	149 endfunc
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	150
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	151 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	152 new
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	153 exe 'r! ' . s:xxd_cmd . ' -v'
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	154 call assert_match("xxd V1.10 .* by Juergen Weigert", 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	155 bwipe!
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	156 endfunc

Mercurial > vim

annotate src/testdir/test_xxd.vim @ 15627:11879b89bb69 v8.1.0821