1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
#! /bin/bash -e
# SPDX-License-Identifier: EPL-2.0 OR GPL-2.0-or-later
# SPDX-FileCopyrightText: Bradley M. Bell <bradbell@seanet.com>
# SPDX-FileContributor: 2003-23 Bradley M. Bell
# ----------------------------------------------------------------------------
if [ "$0" != 'bin/speed_diff.sh' ]
then
echo 'bin/speed_diff.sh: must be executed from its parent directory'
exit 1
fi
if [ "$2" == '' ]
then
cat << EOF
usage: bin/speed_diff.sh speed_one.out speed_two.out
where speed_one.out and speed_two.out are outputs from the speed_cppad program
running its 'speed' test.
EOF
exit 1
fi
speed_one="$1"
speed_two="$2"
if [ ! -f "$speed_one" ]
then
echo "speed_diff.sh: the file $speed_one does not exist."
exit 1
fi
if [ ! -f "$speed_two" ]
then
echo "speed_diff.sh: the file $speed_two does not exist."
exit 1
fi
#
# ---------------------------------------------------------------------------
sed -n -e'/_size *=/p' $speed_one | sort -u > speed_diff.1.$$
sed -n -e'/_size *=/p' $speed_two | sort -u > speed_diff.2.$$
if ! diff speed_diff.1.$$ speed_diff.2.$$
then
echo 'The sizes above do not agree'
echo "< for $speed_one"
echo "> for $speed_two"
rm speed_diff.1.$$ speed_diff.2.$$
exit 1
fi
rm speed_diff.1.$$ speed_diff.2.$$
# ---------------------------------------------------------------------------
#
sed -n \
-e 's|^[a-z]*_||' \
-e 's|_rate|_rate_one|' -e '/_rate_one/p' \
-e 's|available|available_one|' -e '/available_one/p' \
$speed_one > speed_diff.$$
#
sed -n \
-e 's|^[a-z]*_||' \
-e 's|_rate|_rate_two|' -e '/_rate_two/p' \
-e 's|available|available_two|' -e '/available_two/p' \
$speed_two >> speed_diff.$$
#
cat speed_diff.$$ | sort -u
rm speed_diff.$$
# ----------------------------------------------------------------------------
echo "$0: OK"
exit 0
|
