| 1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071 |
- #!/bin/sh
- # Copyright 2017 by Denys Vlasenko <vda.linux@googlemail.com>
- # Licensed under GPLv2, see file LICENSE in this source tree.
- . ./testing.sh
- # testing "test name" "command" "expected result" "file input" "stdin"
- # file input will be file called "input"
- # test can create a file "actual" instead of writing to stdout
- testing "factor ' 0'" \
- "factor ' 0'" \
- "0:\n" \
- "" ""
- testing "factor +1" \
- "factor +1" \
- "1:\n" \
- "" ""
- testing "factor ' +2'" \
- "factor ' +2'" \
- "2: 2\n" \
- "" ""
- testing "factor 1024" \
- "factor 1024" \
- "1024: 2 2 2 2 2 2 2 2 2 2\n" \
- "" ""
- testing "factor 2^61-1" \
- "factor 2305843009213693951" \
- "2305843009213693951: 2305843009213693951\n" \
- "" ""
- testing "factor 2^62-1" \
- "factor 4611686018427387903" \
- "4611686018427387903: 3 715827883 2147483647\n" \
- "" ""
- testing "factor 2^64-1" \
- "factor 18446744073709551615" \
- "18446744073709551615: 3 5 17 257 641 65537 6700417\n" \
- "" ""
- # This is a 60-bit number (0x888 86ff db34 4692): first few primes multiplied together:
- testing "factor \$((2*3*5*7*11*13*17*19*23*29*31*37*41*43*47))" \
- "factor \$((2*3*5*7*11*13*17*19*23*29*31*37*41*43*47))" \
- "614889782588491410: 2 3 5 7 11 13 17 19 23 29 31 37 41 43 47\n" \
- "" ""
- # Test that square-detection code is not buggy
- testing "factor 2 * 3037000493 * 3037000493" \
- "factor 18446743988964486098" \
- "18446743988964486098: 2 3037000493 3037000493\n" \
- "" ""
- testing "factor 3 * 2479700513 * 2479700513" \
- "factor 18446743902517389507" \
- "18446743902517389507: 3 2479700513 2479700513\n" \
- "" ""
- # including square-of-square cases:
- testing "factor 3 * 37831 * 37831 * 37831 * 37831" \
- "factor 6144867742934288163" \
- "6144867742934288163: 3 37831 37831 37831 37831\n" \
- "" ""
- testing "factor 3 * 13^16" \
- "factor 1996249827549539523" \
- "1996249827549539523: 3 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13\n" \
- "" ""
- testing "factor 13^16" \
- "factor 665416609183179841" \
- "665416609183179841: 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13\n" \
- "" ""
- exit $FAILCOUNT
|
