]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - contrib/bc/tests/bc/timeconst.sh
usr.bin/gh-bc, contrib/bc: update to version 5.0.0
[FreeBSD/FreeBSD.git] / contrib / bc / tests / bc / timeconst.sh
1 #! /bin/sh
2 #
3 # Copyright (c) 2018-2021 Gavin D. Howard and contributors.
4 #
5 # Redistribution and use in source and binary forms, with or without
6 # modification, are permitted provided that the following conditions are met:
7 #
8 # * Redistributions of source code must retain the above copyright notice, this
9 #   list of conditions and the following disclaimer.
10 #
11 # * Redistributions in binary form must reproduce the above copyright notice,
12 #   this list of conditions and the following disclaimer in the documentation
13 #   and/or other materials provided with the distribution.
14 #
15 # THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
16 # AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 # ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
19 # LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
20 # CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
21 # SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
22 # INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
23 # CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
24 # ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
25 # POSSIBILITY OF SUCH DAMAGE.
26 #
27
28 # Tests the timeconst.bc script from the Linux kernel build.
29 # You can find the script at kernel/time/timeconst.bc in any Linux repo.
30 # One such repo is: https://github.com/torvalds/linux
31
32 script="$0"
33 testdir=$(dirname "$script")
34
35 outputdir=${BC_TEST_OUTPUT_DIR:-$testdir/..}
36
37 # Gets the timeconst script, which could be a command-line argument.
38 if [ "$#" -gt 0 ]; then
39         timeconst="$1"
40         shift
41 else
42         timeconst="$testdir/scripts/timeconst.bc"
43 fi
44
45 # Gets the executable, which could also be a command-line argument.
46 if [ "$#" -gt 0 ]; then
47         bc="$1"
48         shift
49 else
50         bc="$testdir/../../bin/bc"
51 fi
52
53 #
54 out1="$outputdir/bc_outputs/bc_timeconst.txt"
55 out2="$outputdir/bc_outputs/bc_timeconst_results.txt"
56
57 outdir=$(dirname "$out1")
58
59 # Make sure the directory exists.
60 if [ ! -d "$outdir" ]; then
61         mkdir -p "$outdir"
62 fi
63
64 base=$(basename "$timeconst")
65
66 # If the script does not exist, just skip. Running this test is not necessary.
67 if [ ! -f "$timeconst" ]; then
68         printf 'Warning: %s does not exist\n' "$timeconst"
69         printf 'Skipping...\n'
70         exit 0
71 fi
72
73 # I use these, so unset them to make the tests work.
74 unset BC_ENV_ARGS
75 unset BC_LINE_LENGTH
76 unset DC_ENV_ARGS
77 unset DC_LINE_LENGTH
78
79 printf 'Running %s...' "$base"
80
81 # Get a list of numbers. Funny how bc can help with that.
82 nums=$(printf 'for (i = 0; i <= 1000; ++i) { i }\n' | bc)
83
84 # Run each number through the script.
85 for i in $nums; do
86
87         # Run the GNU bc on the test.
88         printf '%s\n' "$i" | bc -q "$timeconst" > "$out1"
89
90         err="$?"
91
92         # If the other bc failed, it's not GNU bc, or this bc.
93         if [ "$err" -ne 0 ]; then
94                 printf '\nOther bc is not GNU compatible. Skipping...\n'
95                 exit 0
96         fi
97
98         # Run the built bc on the test.
99         printf '%s\n' "$i" | "$bc" "$@" -q "$timeconst" > "$out2"
100
101         diff "$out1" "$out2"
102
103         error="$?"
104
105         # If fail, bail.
106         if [ "$error" -ne 0 ]; then
107                 printf '\nFailed on input: %s\n' "$i"
108                 exit "$error"
109         fi
110
111 done
112
113 rm -f "$out1"
114 rm -f "$out2"
115
116 exec printf 'pass\n'