diff options
Diffstat (limited to 'testsuite/cut.tests')
-rwxr-xr-x | testsuite/cut.tests | 64 |
1 files changed, 64 insertions, 0 deletions
diff --git a/testsuite/cut.tests b/testsuite/cut.tests index 110340277..d705b91c3 100755 --- a/testsuite/cut.tests +++ b/testsuite/cut.tests | |||
@@ -15,4 +15,68 @@ testing "cut '-' (stdin) and multi file handling" \ | |||
15 | "the quick brown fox\n" \ | 15 | "the quick brown fox\n" \ |
16 | "jumps over the lazy dog\n" \ | 16 | "jumps over the lazy dog\n" \ |
17 | 17 | ||
18 | abc="\ | ||
19 | one:two:three:four:five:six:seven | ||
20 | alpha:beta:gamma:delta:epsilon:zeta:eta:theta:iota:kappa:lambda:mu | ||
21 | the quick brown fox jumps over the lazy dog | ||
22 | " | ||
23 | |||
24 | testing "cut -b a,a,a" "cut -b 3,3,3 input" "e\np\ne\n" "$abc" "" | ||
25 | |||
26 | testing "cut -b overlaps" "cut -b 1-3,2-5,7-9,9-10 input" \ | ||
27 | "one:to:th\nalphabeta\nthe qick \n" "$abc" "" | ||
28 | testing "-b encapsulated" "cut -b 3-8,4-6 input" "e:two:\npha:be\ne quic\n" \ | ||
29 | "$abc" "" | ||
30 | # --output-delimiter not implemnted (yet?) | ||
31 | #testing "cut -bO overlaps" \ | ||
32 | # "cut --output-delimiter ' ' -b 1-3,2-5,7-9,9-10 input" \ | ||
33 | # "one:t o:th\nalpha beta\nthe q ick \n" "$abc" "" | ||
34 | testing "cut high-low error" "cut -b 8-3 abc.txt 2>/dev/null || echo err" "err\n" \ | ||
35 | "$abc" "" | ||
36 | |||
37 | testing "cut -c a-b" "cut -c 4-10 input" ":two:th\nha:beta\n quick \n" "$abc" "" | ||
38 | testing "cut -c a-" "cut -c 41- input" "\ntheta:iota:kappa:lambda:mu\ndog\n" "$abc" "" | ||
39 | testing "cut -c -b" "cut -c -39 input" \ | ||
40 | "one:two:three:four:five:six:seven\nalpha:beta:gamma:delta:epsilon:zeta:eta\nthe quick brown fox jumps over the lazy\n" \ | ||
41 | "$abc" "" | ||
42 | testing "cut -c a" "cut -c 40 input" "\n:\n \n" "$abc" "" | ||
43 | testing "cut -c a,b-c,d" "cut -c 3,5-7,10 input" "etwoh\npa:ba\nequi \n" "$abc" "" | ||
44 | |||
45 | testing "cut -f a-" "cut -d ':' -f 5- input" "five:six:seven\nepsilon:zeta:eta:theta:iota:kappa:lambda:mu\nthe quick brown fox jumps over the lazy dog\n" "$abc" "" | ||
46 | |||
47 | testing "cut show whole line with no delim" "cut -d ' ' -f 3 input" \ | ||
48 | "one:two:three:four:five:six:seven\nalpha:beta:gamma:delta:epsilon:zeta:eta:theta:iota:kappa:lambda:mu\nbrown\n" "$abc" "" | ||
49 | |||
50 | testing "cut with echo, -c (a-b)" "echo 'ref_categorie=test' | cut -c 1-15 " "ref_categorie=t\n" "" "" | ||
51 | testing "cut with echo, -c (a)" "echo 'ref_categorie=test' | cut -c 14" "=\n" "" "" | ||
52 | |||
53 | testing "cut with -c (a,b,c)" "cut -c 4,5,20 input" "det\n" "abcdefghijklmnopqrstuvwxyz" "" | ||
54 | |||
55 | testing "cut with -b (a,b,c)" "cut -b 4,5,20 input" "det\n" "abcdefghijklmnopqrstuvwxyz" "" | ||
56 | |||
57 | input="\ | ||
58 | 406378:Sales:Itorre:Jan | ||
59 | 031762:Marketing:Nasium:Jim | ||
60 | 636496:Research:Ancholie:Mel | ||
61 | 396082:Sales:Jucacion:Ed | ||
62 | " | ||
63 | testing "cut with -d -f(:) -s" "cut -d: -f3 -s input" "Itorre\nNasium\nAncholie\nJucacion\n" "$input" "" | ||
64 | testing "cut with -d -f( ) -s" "cut -d' ' -f3 -s input && echo yes" "yes\n" "$input" "" | ||
65 | testing "cut with -d -f(a) -s" "cut -da -f3 -s input" "n\nsium:Jim\n\ncion:Ed\n" "$input" "" | ||
66 | testing "cut with -d -f(a) -s -n" "cut -da -f3 -s -n input" "n\nsium:Jim\n\ncion:Ed\n" "$input" "" | ||
67 | |||
68 | # substitute for awk | ||
69 | testing "cut -DF" "cut -DF 2,7,5" \ | ||
70 | "said and your\nare\nis demand. supply\nforecast :\nyou you better,\n\nEm: Took hate\n" "" \ | ||
71 | "Bother, said Pooh. It's your husband, and he has a gun. | ||
72 | Cheerios are donut seeds. | ||
73 | Talk is cheap because supply exceeds demand. | ||
74 | Weather forecast for tonight : dark. | ||
75 | Apple: you can buy better, but you can't pay more. | ||
76 | Subcalifragilisticexpialidocious. | ||
77 | Auntie Em: Hate you, hate Kansas. Took the dog. Dorothy." | ||
78 | |||
79 | testing "cut empty field" "cut -d ':' -f 1-3" "a::b\n" "" "a::b\n" | ||
80 | testing "cut empty field 2" "cut -d ':' -f 3-5" "b::c\n" "" "a::b::c:d\n" | ||
81 | |||
18 | exit $FAILCOUNT | 82 | exit $FAILCOUNT |