@@ -7,7 +7,7 @@ UNADF=`get_test_cmd unadf`
7
7
# check no args
8
8
check_no_args () {
9
9
$( $UNADF > $actual 2>&1 || exit 0; )
10
- compare_with " check no args" unadf_1
10
+ compare_with " check no args" unadf_no_args
11
11
}
12
12
13
13
check_help () {
@@ -18,28 +18,30 @@ check_help() {
18
18
# check invalid args
19
19
check_invalid_args () {
20
20
$( $UNADF -v > $actual 2>&1 || exit 0; )
21
- compare_with " check invalid arg for -v" unadf_2
21
+ compare_with " check invalid arg for -v" unadf_invalid_args_1
22
22
23
23
$( $UNADF -d > $actual 2>&1 || exit 0; )
24
- compare_with " check invalid arg for -d" unadf_3
24
+ compare_with " check invalid arg for -d" unadf_invalid_args_2
25
25
}
26
26
27
27
# -l (list root directory) option
28
28
check_list_root_directory_option () {
29
29
$UNADF -l " $basedir /arccsh.adf" > $actual 2> /dev/null
30
- compare_with " -l (list root directory) option" unadf_4
30
+ compare_with " -l (list root directory) option" \
31
+ unadf_list_root_directory_option
31
32
}
32
33
33
34
# -r (list entire disk) option
34
35
check_list_entire_disk_option () {
35
36
$UNADF -r " $basedir /arccsh.adf" > $actual 2> /dev/null
36
- compare_with " -r (list entire disk) option" unadf_5
37
+ compare_with " -r (list entire disk) option" unadf_list_entire_disk_option
37
38
}
38
39
39
40
# -s (show logical block pointer) option
40
41
check_show_logical_block_pointer_option () {
41
42
$UNADF -ls " $basedir /arccsh.adf" > $actual 2> /dev/null
42
- compare_with " -s (show logical block pointer) option" unadf_6
43
+ compare_with " -s (show logical block pointer) option" \
44
+ unadf_show_logical_block_pointer_option
43
45
}
44
46
# TODO -c (use dircache data) option
45
47
# TODO -m (display file comments) option
@@ -48,7 +50,7 @@ check_show_logical_block_pointer_option() {
48
50
# -d (extract to dir)
49
51
check_extract_to_dir () {
50
52
$UNADF -d $tmpdir /x " $basedir /arccsh.adf" > $actual 2> /dev/null
51
- compare_with " -d (extract to dir)" unadf_7
53
+ compare_with " -d (extract to dir)" unadf_extract_to_dir
52
54
53
55
# check permissions were set on extracted files
54
56
# (these tests are failing on MSYS2:
@@ -68,26 +70,28 @@ check_extract_to_dir_with_specific_files() {
68
70
$UNADF -d $tmpdir /x " $basedir /arccsh.adf" csh s/startup-sequence \
69
71
devs/system-configuration > $actual 2> /dev/null
70
72
compare_with " -d (extract to dir) with specific files, not all their original case" \
71
- unadf_8
73
+ unadf_extract_to_dir_with_specific_files
72
74
}
73
75
# TODO check permissions were set (bug: currently they aren't)
74
76
75
77
# -p (extract to pipe) option
76
78
check_extract_to_pipe_option () {
77
79
$UNADF -p " $basedir /arccsh.adf" s/startup-sequence > $actual 2> /dev/null
78
- compare_with " -p (extract to pipe) option" unadf_9
80
+ compare_with " -p (extract to pipe) option" unadf_extract_to_pipe_option
79
81
}
80
82
81
83
# -w (mangle win32 filenames) option
82
84
check_mangle_win32_filenames_option () {
83
85
$UNADF -d $tmpdir /x -w " $basedir /win32-names.adf" > $actual 2> /dev/null
84
- compare_with " -w (mangle win32 filenames) option" unadf_10
86
+ compare_with " -w (mangle win32 filenames) option" \
87
+ unadf_mangle_win32_filenames_option
85
88
}
86
89
87
90
# confirm the mangling (-w) only occurs on extraction
88
91
check_confirm_the_mangling () {
89
92
$UNADF -r -w " $basedir /win32-names.adf" > $actual 2> /dev/null
90
- compare_with " confirm the mangling (-w) only occurs on extraction" unadf_11
93
+ compare_with " confirm the mangling (-w) only occurs on extraction" \
94
+ unadf_confirm_the_mangling
91
95
}
92
96
93
97
0 commit comments