| #!/bin/sh |
| |
| # Copyright 2007 by Denys Vlasenko <vda.linux@googlemail.com> |
| # Licensed under GPLv2, see file LICENSE in this source tree. |
| |
| . ./testing.sh |
| |
| # testing "test name" "options" "expected result" "file input" "stdin" |
| # file input will be file called "input" |
| # test can create a file "actual" instead of writing to stdout |
| |
| testing "cut '-' (stdin) and multi file handling" \ |
| "cut -d' ' -f2 - input" \ |
| "over\n""quick\n" \ |
| "the quick brown fox\n" \ |
| "jumps over the lazy dog\n" \ |
| |
| abc="\ |
| one:two:three:four:five:six:seven |
| alpha:beta:gamma:delta:epsilon:zeta:eta:theta:iota:kappa:lambda:mu |
| the quick brown fox jumps over the lazy dog |
| " |
| |
| testing "cut -b a,a,a" "cut -b 3,3,3 input" "e\np\ne\n" "$abc" "" |
| |
| testing "cut -b overlaps" "cut -b 1-3,2-5,7-9,9-10 input" \ |
| "one:to:th\nalphabeta\nthe qick \n" "$abc" "" |
| testing "-b encapsulated" "cut -b 3-8,4-6 input" "e:two:\npha:be\ne quic\n" \ |
| "$abc" "" |
| # --output-delimiter not implemnted (yet?) |
| #testing "cut -bO overlaps" \ |
| # "cut --output-delimiter ' ' -b 1-3,2-5,7-9,9-10 input" \ |
| # "one:t o:th\nalpha beta\nthe q ick \n" "$abc" "" |
| testing "cut high-low error" "cut -b 8-3 abc.txt 2>/dev/null || echo err" "err\n" \ |
| "$abc" "" |
| |
| testing "cut -c a-b" "cut -c 4-10 input" ":two:th\nha:beta\n quick \n" "$abc" "" |
| testing "cut -c a-" "cut -c 41- input" "\ntheta:iota:kappa:lambda:mu\ndog\n" "$abc" "" |
| testing "cut -c -b" "cut -c -39 input" \ |
| "one:two:three:four:five:six:seven\nalpha:beta:gamma:delta:epsilon:zeta:eta\nthe quick brown fox jumps over the lazy\n" \ |
| "$abc" "" |
| testing "cut -c a" "cut -c 40 input" "\n:\n \n" "$abc" "" |
| testing "cut -c a,b-c,d" "cut -c 3,5-7,10 input" "etwoh\npa:ba\nequi \n" "$abc" "" |
| |
| 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" "" |
| |
| testing "cut show whole line with no delim" "cut -d ' ' -f 3 input" \ |
| "one:two:three:four:five:six:seven\nalpha:beta:gamma:delta:epsilon:zeta:eta:theta:iota:kappa:lambda:mu\nbrown\n" "$abc" "" |
| |
| testing "cut with echo, -c (a-b)" "echo 'ref_categorie=test' | cut -c 1-15 " "ref_categorie=t\n" "" "" |
| testing "cut with echo, -c (a)" "echo 'ref_categorie=test' | cut -c 14" "=\n" "" "" |
| |
| testing "cut with -c (a,b,c)" "cut -c 4,5,20 input" "det\n" "abcdefghijklmnopqrstuvwxyz" "" |
| |
| testing "cut with -b (a,b,c)" "cut -b 4,5,20 input" "det\n" "abcdefghijklmnopqrstuvwxyz" "" |
| |
| input="\ |
| 406378:Sales:Itorre:Jan |
| 031762:Marketing:Nasium:Jim |
| 636496:Research:Ancholie:Mel |
| 396082:Sales:Jucacion:Ed |
| " |
| testing "cut with -d -f(:) -s" "cut -d: -f3 -s input" "Itorre\nNasium\nAncholie\nJucacion\n" "$input" "" |
| testing "cut with -d -f( ) -s" "cut -d' ' -f3 -s input && echo yes" "yes\n" "$input" "" |
| testing "cut with -d -f(a) -s" "cut -da -f3 -s input" "n\nsium:Jim\n\ncion:Ed\n" "$input" "" |
| testing "cut with -d -f(a) -s -n" "cut -da -f3 -s -n input" "n\nsium:Jim\n\ncion:Ed\n" "$input" "" |
| |
| # substitute for awk |
| optional FEATURE_CUT_REGEX |
| testing "cut -DF" "cut -DF 2,7,5" \ |
| "said and your\nare\nis demand. supply\nforecast :\nyou you better,\n\nEm: Took hate\n" "" \ |
| "Bother, said Pooh. It's your husband, and he has a gun. |
| Cheerios are donut seeds. |
| Talk is cheap because supply exceeds demand. |
| Weather forecast for tonight : dark. |
| Apple: you can buy better, but you can't pay more. |
| Subcalifragilisticexpialidocious. |
| Auntie Em: Hate you, hate Kansas. Took the dog. Dorothy." |
| SKIP= |
| |
| testing "cut empty field" "cut -d ':' -f 1-3" "a::b\n" "" "a::b\n" |
| testing "cut empty field 2" "cut -d ':' -f 3-5" "b::c\n" "" "a::b::c:d\n" |
| |
| exit $FAILCOUNT |