85 lines
3.5 KiB
Bash
Executable File
85 lines
3.5 KiB
Bash
Executable File
#!/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
|