| #!/bin/sh |
| |
| # SUSv3 compliant seq tests. |
| # Copyright 2006 by Rob Landley <rob@landley.net> |
| # Licensed under GPLv2, see file LICENSE in this source tree. |
| |
| # AUDIT: Full SUSv3 coverage (except internationalization). |
| |
| . ./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 |
| |
| # Test exit status |
| |
| testing "seq (exit with error)" "seq 2> /dev/null || echo yes" "yes\n" "" "" |
| testing "seq (exit with error)" "seq 1 2 3 4 2> /dev/null || echo yes" \ |
| "yes\n" "" "" |
| testing "seq one argument" "seq 3" "1\n2\n3\n" "" "" |
| testing "seq two arguments" "seq 5 7" "5\n6\n7\n" "" "" |
| testing "seq two arguments reversed" "seq 7 5" "" "" "" |
| testing "seq two arguments equal" "seq 3 3" "3\n" "" "" |
| testing "seq two arguments equal, arbitrary negative step" "seq 1 -15 1" \ |
| "1\n" "" "" |
| testing "seq two arguments equal, arbitrary positive step" "seq 1 +15 1" \ |
| "1\n" "" "" |
| testing "seq count up by 2" "seq 4 2 8" "4\n6\n8\n" "" "" |
| testing "seq count down by 2" "seq 8 -2 4" "8\n6\n4\n" "" "" |
| testing "seq count wrong way #1" "seq 4 -2 8" "" "" "" |
| testing "seq count wrong way #2" "seq 8 2 4" "" "" "" |
| testing "seq count by .3" "seq 3 .3 4" "3.0\n3.3\n3.6\n3.9\n" "" "" |
| testing "seq count by .30" "seq 3 .30 4" "3.00\n3.30\n3.60\n3.90\n" "" "" |
| testing "seq count by .30 to 4.000" "seq 3 .30 4.000" "3.00\n3.30\n3.60\n3.90\n" "" "" |
| testing "seq count by -.9" "seq .7 -.9 -2.2" "0.7\n-0.2\n-1.1\n-2.0\n" "" "" |
| testing "seq count by zero" "seq 4 0 8 | head -n 10" "4\n4\n4\n4\n4\n4\n4\n4\n4\n4\n" "" "" |
| |
| testing "seq one argument with padding" "seq -w 003" "001\n002\n003\n" "" "" |
| testing "seq two arguments with padding" "seq -w 005 7" "005\n006\n007\n" "" "" |
| testing "seq count down by 3 with padding" "seq -w 8 -3 04" "08\n05\n" "" "" |
| # Looks like a bug in coreutils 6.10: it uses width one less than needed |
| # These tests contain the expected "fixed" output |
| testing "seq count by .3 with padding 1" "seq -w 09 .3 11" "09.0\n09.3\n09.6\n09.9\n10.2\n10.5\n10.8\n" "" "" |
| testing "seq count by .3 with padding 2" "seq -w 03 .3 0004" "0003.0\n0003.3\n0003.6\n0003.9\n" "" "" |
| |
| exit $FAILCOUNT |
