cavern.tst: Work around Apple's stone-age sed
[survex.git] / tests / cavern.tst
blobace47d8ca2b5e5a9f207f178a1233e6b1be242b9
1 #!/bin/sh
3 # Survex test suite - cavern tests
4 # Copyright (C) 1999-2004,2005,2006,2010,2012,2013,2014,2015,2016,2017 Olly Betts
6 # This program is free software; you can redistribute it and/or modify
7 # it under the terms of the GNU General Public License as published by
8 # the Free Software Foundation; either version 2 of the License, or
9 # (at your option) any later version.
11 # This program is distributed in the hope that it will be useful,
12 # but WITHOUT ANY WARRANTY; without even the implied warranty of
13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 # GNU General Public License for more details.
16 # You should have received a copy of the GNU General Public License
17 # along with this program; if not, write to the Free Software
18 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
20 testdir=`echo $0 | sed 's!/[^/]*$!!' || echo '.'`
22 # allow us to run tests standalone more easily
23 : ${srcdir="$testdir"}
25 # force VERBOSE if we're run on a subset of tests
26 test -n "$*" && VERBOSE=1
28 test -x "$testdir"/../src/cavern || testdir=.
30 # Make testdir absolute, so we can cd before running cavern to get a consistent
31 # path in diagnostic messages.
32 testdir=`(cd "$testdir" && pwd)`
34 : ${CAVERN="$testdir"/../src/cavern}
35 : ${DIFFPOS="$testdir"/../src/diffpos}
36 : ${CAD3D="$testdir"/../src/cad3d}
38 : ${TESTS=${*:-"singlefix singlereffix oneleg midpoint noose cross firststn\
39  deltastar deltastar2 bug3 calibrate_tape nosurvey2 cartesian cartesian2\
40  lengthunits angleunits cmd_alias cmd_truncate cmd_case cmd_fix cmd_solve\
41  cmd_entrance cmd_entrance_bad cmd_sd cmd_sd_bad cmd_fix_bad cmd_set\
42  cmd_set_bad beginroot revcomplist break_replace_pfx bug0 bug1 bug2 bug4 bug5\
43  expobug require export export2 includecomment\
44  self_loop self_eq_loop reenterwarn cmd_default cmd_prefix cmd_prefix_bad\
45  cmd_begin_bad cmd_equate_bad cmd_export_bad\
46  singlefixerr singlereffixerr\
47  begin_no_end end_no_begin end_no_begin_nest require_fail\
48  exporterr1 exporterr2 exporterr3 exporterr4 exporterr5\
49  exporterr1b exporterr2b exporterr3b exporterr6 exporterr6b\
50  hanging_cpt badinc badinc2 badinc3 badinc4 nonexistent_file ONELEG\
51  stnsurvey1 stnsurvey2\
52  tapelessthandepth longname chinabug chinabug2\
53  multinormal multinormignall multidiving multicylpolar multicartesian\
54  multinosurv multinormalbad multibug\
55  cmd_title cmd_titlebad cmd_dummy cmd_infer cmd_date cmd_datebad cmd_datebad2\
56  cartes diving cylpolar normal normal_bad normignall nosurv cmd_flags\
57  bad_cmd_flags plumb unusedstation exportnakedbegin oldestyle bugdz\
58  baddatacylpolar badnewline badquantities imgoffbyone infereqtopofil 3sdfixbug\
59  omitclino back back2 bad_back\
60  notentranceorexport inferunknown inferexports bad_units_factor\
61  bad_units_qlist\
62  percent_gradient dotinsurvey leandroclino lowsd revdir gettokennullderef\
63  nosurveyhanging cmd_solve_nothing cmd_solve_nothing_implicit\
64  cmd_calibrate cmd_declination cmd_declination_auto cmd_declination_conv\
65  lech level 2fixbug dot17 3dcorner\
66  unconnected-bug\
67  declination.dat ignore.dat backread.dat nomeasure.dat noteam.dat\
68  surfequate passage hanging_lrud equatenosuchstn surveytypo\
69  skipafterbadomit passagebad badreadingdotplus badcalibrate calibrate_clino\
70  badunits badbegin anonstn anonstnbad anonstnrev doubleinc reenterlots\
71  cs csbad csbadsdfix csfeet cslonglat omitfixaroundsolve repeatreading\
72  mixedeols utf8bom nonewlineateof\
73 "}}
75 # Test file stnsurvey3.svx missing: pos=fail # We exit before the error count.
77 LC_ALL=C
78 export LC_ALL
79 SURVEXLANG=en
80 export SURVEXLANG
82 vg_error=123
83 vg_log=$testdir/vg.log
84 if [ -n "$VALGRIND" ] ; then
85   rm -f "$vg_log"
86   CAVERN="$VALGRIND --log-file=$vg_log --error-exitcode=$vg_error $CAVERN"
87   DIFFPOS="$VALGRIND --log-file=$vg_log --error-exitcode=$vg_error $DIFFPOS"
88   CAD3D="$VALGRIND --log-file=$vg_log --error-exitcode=$vg_error $CAD3D"
91 for file in $TESTS ; do
92   case $file in
93     nonexistent_file*|ONELEG)
94       # ONELEG tests that we don't apply special handling to command line
95       # arguments, only those in *include.
96       realfile= ;;
97     *.*) realfile=$file ;;
98     *) realfile=$file.svx ;;
99   esac
101   if [ -n "$realfile" ] && [ ! -r "$realfile" ] ; then
102     echo "Warning: don't know how to run test '$file' - skipping it"
103     continue
104   fi
106   echo "$file"
108   # how many warnings to expect
109   warn=
110   # how many errors to expect
111   error=
113   case $file in
114     *.dat)
115       # .dat files can't start with a comment.  All the current .dat tests
116       # have the same settings.
117       pos=yes
118       warn=0
119       ;;
120     nonexistent_file*|ONELEG)
121       # We exit before the error count.
122       pos=fail
123       ;;
124     *)
125       read header < "$realfile"
126       set dummy $header
127       while shift && [ -n "$1" ] ; do
128         case $1 in
129           pos=*) pos=`expr "$1" : 'pos=\(.*\)'` ;;
130           warn=*) warn=`expr "$1" : 'warn=\(.*\)'` ;;
131           error=*) error=`expr "$1" : 'error=\(.*\)'` ;;
132         esac
133       done
134       ;;
135   esac
137   basefile=$srcdir/$file
138   case $file in
139   *.*)
140     input="./$file"
141     basefile=`echo "$basefile"|sed 's/\.[^.]*$//'` ;;
142   *)
143     input="./$file.svx" ;;
144   esac
145   outfile=$basefile.out
146   posfile=$basefile.pos
147   dxffile=$basefile.dxf
148   rm -f tmp.*
149   pwd=`pwd`
150   cd "$srcdir"
151   srcdir=. $CAVERN "$input" --output="$pwd/tmp" > "$pwd/tmp.out"
152   exitcode=$?
153   cd "$pwd"
154   test -n "$VERBOSE" && cat tmp.out
155   if [ -n "$VALGRIND" ] ; then
156     if [ $exitcode = "$vg_error" ] ; then
157       cat "$vg_log"
158       rm "$vg_log"
159       exit 1
160     fi
161     rm "$vg_log"
162   fi
163   if test fail = "$pos" ; then
164     # success gives 0, signal (128 + <signal number>)
165     test $exitcode = 1 || exit 1
166   else
167     test $exitcode = 0 || exit 1
168   fi
169   if test -n "$warn" ; then
170     w=`sed '$!d;s/^There were \([0-9]*\).*/\1/;s/^[^0-9].*$/0/' tmp.out`
171     if test x"$w" != x"$warn" ; then
172       test -n "$VERBOSE" && echo "Got $w warnings, expected $warn"
173       exit 1
174     fi
175   fi
176   if test -n "$error" ; then
177     e=`sed '$!d;s/^There were .* and \([0-9][0-9]*\).*/\1/;s/^[^0-9].*$/0/' tmp.out`
178     if test x"$e" != x"$error" ; then
179       test -n "$VERBOSE" && echo "Got $e errors, expected $error"
180       exit 1
181     fi
182   fi
183   # m* would ideally be m\? but Apple's stone-age sed doesn't support \?.
184   nan=`sed 's/.*\<[Nn]a[Nn]m*\>.*/x/p;d' tmp.out`
185   if test -n "$nan" ; then
186     exit 1
187   fi
189   case $pos in
190   yes)
191     if test -n "$VERBOSE" ; then
192       $DIFFPOS "$posfile" tmp.3d
193       exitcode=$?
194     else
195       $DIFFPOS "$posfile" tmp.3d > /dev/null
196       exitcode=$?
197     fi
198     if [ -n "$VALGRIND" ] ; then
199       if [ $exitcode = "$vg_error" ] ; then
200         cat "$vg_log"
201         rm "$vg_log"
202         exit 1
203       fi
204       rm "$vg_log"
205     fi
206     [ "$exitcode" = 0 ] || exit 1
207     ;;
208   dxf)
209     if test -n "$VERBOSE" ; then
210       $CAD3D tmp.3d tmp.dxf
211       exitcode=$?
212     else
213       $CAD3D tmp.3d tmp.dxf > /dev/null
214       exitcode=$?
215     fi
216     if [ -n "$VALGRIND" ] ; then
217       if [ $exitcode = "$vg_error" ] ; then
218         cat "$vg_log"
219         rm "$vg_log"
220         exit 1
221       fi
222       rm "$vg_log"
223     fi
224     [ "$exitcode" = 0 ] || exit 1
225     if test -n "$VERBOSE" ; then
226       diff "$dxffile" tmp.dxf || exit 1
227     else
228       cmp -s "$dxffile" tmp.dxf || exit 1
229     fi ;;
230   no)
231     test -f tmp.3d || exit 1 ;;
232   fail)
233     test -f tmp.3d && exit 1
234     # Check that last line doesn't contains "Bug in program detected"
235     case `tail -n 1 tmp.out` in
236     *"Bug in program detected"*) exit 1 ;;
237     esac ;;
238   *)
239     echo "Bad value for pos: '$pos'" ; exit 1 ;;
240   esac
242   if test -f "$outfile" ; then
243     # Check output is as expected, working around Apple's stone-age sed.
244     if test -n "$VERBOSE" ; then
245       sed '1,/^Copyright/d;/^\(CPU \)*[Tt]ime used  *[0-9][0-9.]*s$/d;s!.*/src/\(cavern: \)!\1!' tmp.out|diff "$outfile" - || exit 1
246     else
247       sed '1,/^Copyright/d;/^\(CPU \)*[Tt]ime used  *[0-9][0-9.]*s$/d;s!.*/src/\(cavern: \)!\1!' tmp.out|cmp -s "$outfile" - || exit 1
248     fi
249   fi
250   rm -f tmp.*
251 done
252 test -n "$VERBOSE" && echo "Test passed"
253 exit 0