/[MITgcm]/MITgcm/verification/testreport
ViewVC logotype

Annotation of /MITgcm/verification/testreport

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.26 - (hide annotations) (download)
Fri Dec 5 14:56:45 2003 UTC (20 years, 3 months ago) by edhill
Branch: MAIN
Changes since 1.25: +4 -1 lines
 o export "CC=cc" so we have a saner default compiler for mpack

1 edhill 1.19 #! /usr/bin/env bash
2 edhill 1.1 #
3 edhill 1.26 # $Header: /u/u3/gcmpack/MITgcm/verification/testreport,v 1.25 2003/12/04 16:36:18 edhill Exp $
4 edhill 1.12 # $Name: $
5 edhill 1.1 #
6    
7     usage()
8     {
9     echo
10     echo "Usage: $0 [OPTIONS]"
11     echo
12     echo "where possible OPTIONS are:"
13     echo " (-help|-h) print usage"
14 edhill 1.7 echo " (-mpi) use MPI input files"
15 edhill 1.10 echo " (-ieee|-noieee) if possible, use IEEE compiler flags"
16 edhill 1.20 echo " (DEF=\"noieee\")"
17 edhill 1.6 echo " (-optfile=|-of=)STRING list of optfiles to use"
18 edhill 1.20 echo " (-a|-addr) STRING list of email recipients"
19 edhill 1.6 echo " (DEF=\"edhill@mitgcm.org\")"
20 edhill 1.20 echo " (-t|-tdir) STRING list of test dirs to use"
21 edhill 1.6 echo " (DEF=\"\" which builds all)"
22 edhill 1.20 echo " (-b|-bash) STRING preferred location of a \"bash\" or"
23     echo " Bourne-compatible \"sh\" shell"
24     echo " (DEF=\"\" for \"bash\")"
25 edhill 1.24 echo " (-adm|-ad) perform an adjoint run"
26 edhill 1.20 echo " (-command) STRING command to run"
27 edhill 1.6 echo " (DEF=\"make output.txt\")"
28 edhill 1.20 echo " (-m|-make) STRING command to use for \"make\""
29 edhill 1.8 echo " (DEF=\"make\")"
30 edhill 1.10 echo " (-clean) *ONLY* run \"make CLEAN\""
31     echo " (-quick|-q) same as \"-nogenmake -noclean -nodepend\""
32     echo " (-nogenmake|-ng) skip the genmake stage"
33     echo " (-noclean|-nc) skip the \"make clean\" stage"
34     echo " (-nodepend|-nd) skip the \"make depend\" stage"
35 edhill 1.6 echo
36     echo "and where STRING follows a whitespace-delimited format"
37     echo "such as:"
38     echo " -t 'exp0 exp2 exp3' "
39     echo " -addr='abc@123.com testing@home.org'"
40 edhill 1.1 echo
41     exit 1
42     }
43    
44     # build the mpack utility
45     build_mpack()
46     {
47     echo -n "building the mpack utility... "
48     if test ! -x "$MPACKDIR/mpack" ; then
49     if test ! -d $MPACKDIR ; then
50 edhill 1.20 echo
51 edhill 1.1 echo "Error: can't find \"$MPACKDIR\""
52     echo " are you sure this program is being run in the correct "
53     echo " (that is, \"MITGCM_ROOT\verification\") directory?"
54 edhill 1.20 echo
55     HAVE_MPACK=f
56 edhill 1.1 fi
57     echo -n "building mpack... "
58 edhill 1.26 if test "x$CC" = x ; then
59     export CC=cc
60     fi
61 edhill 1.25 ( cd $MPACKDIR && ./configure && $MAKE ) > tr_build_mpack.out 2>&1
62 edhill 1.1 RETVAL=$?
63     if test "x$RETVAL" != x0 ; then
64     echo
65     echo "Error building the mpack tools at: $MPACK_DIR"
66 edhill 1.20 echo
67     HAVE_MPACK=f
68     else
69 edhill 1.25 rm -f tr_build_mpack.out
70 edhill 1.20 HAVE_MPACK=t
71 edhill 1.1 fi
72 edhill 1.20 else
73     HAVE_MPACK=t
74 edhill 1.1 fi
75     echo "OK"
76     }
77    
78     testoutput_for_prop()
79     {
80     # testoutput_for_prop dir s1 label subdir
81     #
82     # compares files in $dir/$subdir/output.txt and $dir/results/output.txt
83     # using search strings s1 and text label
84    
85     if [ $debug -gt 0 ]; then
86     echo testoutput_for_prop: grep "$2" $1/$4/output.txt 1>&2
87     fi
88     if [ -r $1/$4/output.txt ]; then
89 edhill 1.15 grep "$2" $1/$4/output.txt | sed 's/.*=//' | cat -n > tmp1.txt
90 edhill 1.1 lncnt=`wc -l tmp1.txt | awk '{print $1}' `
91     if [ $lncnt -lt 3 ]; then
92     if [ $verbose -gt 0 ]; then
93     echo Not enough lines of output when searching for "$2" 1>&2
94     fi
95     return 99
96     fi
97     else
98     echo testoutput_for_prop: output.txt from model run was not readable 1>&2
99     return 99
100     fi
101     if [ $debug -gt 0 ]; then
102     echo testoutput_for_prop: grep "$2" $1/results/output.txt 1>&2
103     fi
104 edhill 1.15 grep "$2" $1/results/output.txt | sed 's/.*=//' | cat -n > tmp2.txt
105 edhill 1.1 lncnt=`wc -l tmp2.txt | awk '{print $1}' `
106     if [ $lncnt -lt 3 ]; then
107     if [ $verbose -gt 0 ]; then
108     echo Not enough lines of output when searching for "$2" 1>&2
109     fi
110     return 99
111     fi
112     if [ $debug -gt 0 ]; then
113     echo testoutput_for_prop: join tmp1.txt tmp2.txt 1>&2
114     fi
115     join tmp1.txt tmp2.txt | awk '{print $1 " " $2 " " $3}' > tmp3.txt
116     if [ $debug -gt 0 ]; then
117     echo testoutput_for_prop: compare_lines 1>&2
118     fi
119 edhill 1.22 if [ $verbose -gt 1 ]; then
120     cat tmp3.txt 1>&2
121     fi
122     echo "-1" >> tmp3.txt
123 edhill 1.23 # On the SGI O3K (*not* the O2K), "cat -n" inserts a ":" after the line number
124     cat tmp3.txt | sed -e 's|:||g' > tmp4.txt
125     digits_of_similarity=`./tmp_cmpnum < tmp4.txt`
126 edhill 1.1 if [ $digits_of_similarity -eq 99 ]; then
127     if [ $verbose -gt 0 ]; then
128     echo testoutput_for_prop: No comparison was available for \"$2\" 1>&2
129     fi
130     digits_of_similarity=99
131     else
132     if [ $verbose -gt 0 ]; then
133     echo There were $digits_of_similarity decimal places of similarity for \"$2\" 1>&2
134     fi
135     fi
136 edhill 1.23 rm -f tmp1.txt tmp2.txt tmp3.txt tmp4.txt
137 edhill 1.1
138     return $digits_of_similarity
139     }
140    
141     dashnum()
142     {
143     # dashnum n1 n2 n3 ...
144     #
145     # print numbers using %3i format or "--" if number = 99
146    
147     for num in $@ ; do
148     if [ $num = 99 ]; then
149     printf ' --'
150     else
151     printf '%3i' $num
152     fi
153     done
154     }
155    
156 edhill 1.24 testoutput_ad()
157     {
158     grep $3 $1/results_ad/output.txt_adm | awk '{print NR " " $5}' > t05.txt
159     grep $3 $1/$2/output.txt_adm | awk '{print NR " " $5}' > t15.txt
160     grep $3 $1/results_ad/output.txt_adm | awk '{print NR " " $6}' > t06.txt
161     grep $3 $1/$2/output.txt_adm | awk '{print NR " " $6}' > t16.txt
162     join t05.txt t15.txt > t5.txt
163     join t06.txt t16.txt > t6.txt
164     echo "-1" >> t5.txt
165     echo "-1" >> t6.txt
166     digits_5=`./tmp_cmpnum < t5.txt`
167     digits_6=`./tmp_cmpnum < t6.txt`
168     dashnum $digits_5 $digits_6
169     rm -f t[01][56].txt t[56].txt
170     }
171    
172 edhill 1.1 testoutput()
173     {
174 edhill 1.24 # testoutput directory subdir
175 edhill 1.1 #
176     # test output in "directory"
177 edhill 1.24 if test "x$ADM" = x ; then
178     if [ $debug -gt 0 ]; then
179     echo testoutput: testoutput_for_prop $1 cg2d_init_res 1>&2
180     fi
181     testoutput_for_prop $1 "cg2d_init_res" "cg2d init. residual" $2; cg2dres=$?
182     if [ $debug -gt 0 ]; then
183     echo testoutput: cg2dres=$cg2dres 1>&2
184     fi
185     testoutput_for_prop $1 "dynstat_theta_min" "theta minimum" $2; tmin=$?
186     testoutput_for_prop $1 "dynstat_theta_max" "theta maximum" $2; tmax=$?
187     testoutput_for_prop $1 "dynstat_theta_mean" "theta mean" $2; tmean=$?
188     testoutput_for_prop $1 "dynstat_theta_sd" "theta s.d." $2; tsd=$?
189     testoutput_for_prop $1 "dynstat_salt_min" "salt minimum" $2; smin=$?
190     testoutput_for_prop $1 "dynstat_salt_max" "salt maximum" $2; smax=$?
191     testoutput_for_prop $1 "dynstat_salt_mean" "salt mean" $2; smean=$?
192     testoutput_for_prop $1 "dynstat_salt_sd" "salt s.d." $2; ssd=$?
193     testoutput_for_prop $1 "dynstat_uvel_min" "U minimum" $2; umin=$?
194     testoutput_for_prop $1 "dynstat_uvel_max" "U maximum" $2; umax=$?
195     testoutput_for_prop $1 "dynstat_uvel_mean" "U mean" $2; umean=$?
196     testoutput_for_prop $1 "dynstat_uvel_sd" "U s.d." $2; usd=$?
197     testoutput_for_prop $1 "dynstat_vvel_min" "V minimum" $2; vmin=$?
198     testoutput_for_prop $1 "dynstat_vvel_max" "V maximum" $2; vmax=$?
199     testoutput_for_prop $1 "dynstat_vvel_mean" "V mean" $2; vmean=$?
200     testoutput_for_prop $1 "dynstat_vvel_sd" "V s.d." $2; vsd=$?
201     dashnum $cg2dres $tmin $tmax $tmean $tsd $smin $smax $smean $ssd \
202     $umin $umax $umean $usd $vmin $vmax $vmean $vsd
203     else
204     testoutput_ad $1 $2 "precision_grdchk_result"
205 edhill 1.1 fi
206     }
207    
208     genmakemodel()
209     {
210     # genmakemodel directory
211 edhill 1.10 if test "x$NOGENMAKE" = xt ; then
212     echo "genmake skipped!"
213     else
214     GENMAKE2="$BASH ../../../tools/genmake2"
215     (
216     cd $1;
217 edhill 1.24 command="$GENMAKE2 -ds -m $MAKE"
218     if test "x$ADM" = x ; then
219     command="$command --mods=../code"
220     else
221     command="$command --mods=../code_ad"
222     command="$command -adof=../../../tools/adjoint_options/adjoint_staf"
223     fi
224 edhill 1.10 if test "x$OPTFILE" != xNONE ; then
225     command="$command --optfile=$OPTFILE"
226     fi
227     if test "x$IEEE" != x ; then
228     command="$command -ieee"
229     fi
230     printf 'genmake ... ' 1>&2
231     $command > make.log 2>&1
232     RETVAL=$?
233 edhill 1.21 cp Makefile $CDIR
234 edhill 1.10 if test "x$RETVAL" != x0 ; then
235     tail make.log
236     echo "genmakemodel: genmake failed" 1>&2
237 edhill 1.21 cp genmake_* make.log $CDIR
238 edhill 1.10 return 1
239     else
240 edhill 1.20 echo "successful" 1>&2
241 edhill 1.1 fi
242 edhill 1.10 )
243     fi
244 edhill 1.1 }
245    
246     makeclean()
247     {
248     # makeclean directory
249 edhill 1.10 if test "x$NOCLEAN" = xt ; then
250     echo "make CLEAN skipped!"
251     else
252     (
253     cd $1;
254     if test -e output.txt ; then
255     rm -f output.txt
256     fi
257     printf 'make CLEAN ... ' 2>&1
258     if test -r Makefile ; then
259     $MAKE CLEAN >> make.log 2>&1
260     RETVAL=$?
261     if test "x$RETVAL" != x0 ; then
262     tail make.log
263     echo "makeclean: \"make CLEAN\" failed" 1>&2
264     cp make.log $CDIR"/make.log"
265     return 1
266     fi
267     fi
268 edhill 1.20 echo successful 1>&2
269 edhill 1.10 exit 0
270     )
271     fi
272     }
273    
274     makedependmodel()
275     {
276     # makedependmodel directory
277     if test "x$NODEPEND" = xt ; then
278     echo "make depend skipped!"
279     else
280     (
281     cd $1;
282     printf 'make depend ... ' 1>&2
283     $MAKE depend >> make.log 2>&1
284 edhill 1.1 RETVAL=$?
285     if test "x$RETVAL" != x0 ; then
286     tail make.log
287 edhill 1.10 echo "makedependmodel: make depend failed" 1>&2
288 edhill 1.1 cp make.log $CDIR"/make.log"
289     return 1
290 edhill 1.10 else
291 edhill 1.20 echo successful 1>&2
292 edhill 1.1 fi
293 edhill 1.10 )
294     fi
295 edhill 1.1 }
296    
297     makemodel()
298     {
299     # makemodel directory
300     (
301     cd $1;
302     if test -r Makefile ; then
303     printf 'make ... ' 1>&2
304 edhill 1.24 if test "x$ADM" = x ; then
305     $MAKE >> make.log 2>&1
306     else
307     $MAKE adall >> make.log 2>&1
308     fi
309 edhill 1.1 RETVAL=$?
310     if test "x$RETVAL" != x0 ; then
311     tail make.log
312     echo failed 1>&2
313     cp make.log $CDIR"/make.log"
314     return 1
315     else
316 edhill 1.20 echo successful 1>&2
317 edhill 1.1 fi
318     fi
319     )
320     }
321    
322     linkdata()
323     {
324     # linkdata flag
325     #
326     # symbolically link data files to run directory
327 edhill 1.12 if test "x$1" = x1 ; then
328     (
329     cd $2
330 edhill 1.24 if test "x$ADM" = x ; then
331     files=`( cd ../input ; ls -1 | grep -v CVS )`
332     for i in $files ; do
333     if test ! -d "../input/"$i ; then
334     ln -sf "../input/"$i $i
335     fi
336     done
337     else
338     files=`( cd ../input ; ls -1 *.bin | grep -v CVS )`
339     for i in $files ; do
340     if test ! -d "../input/"$i ; then
341     ln -sf "../input/"$i $i
342     fi
343     done
344     files=`( cd ../input_ad ; ls -1 | grep -v CVS )`
345     for i in $files ; do
346     if test ! -d "../input_ad/"$i ; then
347     ln -sf "../input_ad/"$i $i
348     fi
349     done
350     fi
351 edhill 1.12 )
352 edhill 1.1 fi
353     }
354    
355     runmodel()
356     {
357 edhill 1.6 # runmodel directory
358 edhill 1.1 #
359 edhill 1.24 # runs "$COMMAND in "directory"
360 edhill 1.6 # (where "$COMMAND" is relative to "directory")
361 edhill 1.1 (
362     cd $1
363 edhill 1.20 printf 'runmodel ... ' 1>&2
364 edhill 1.6 # make output.txt
365 edhill 1.20 $COMMAND >> run.log 2>&1
366 edhill 1.6 RETVAL=$?
367     if test "x$RETVAL" = x0 ; then
368 edhill 1.20 echo successful 1>&2
369 edhill 1.24 if test "x$ADM" = x ; then
370     cp output.txt $CDIR"/output.txt"
371     else
372     cp output.txt_adm $CDIR"/output.txt_adm"
373     fi
374 edhill 1.6 return 0
375     else
376 edhill 1.20 tail run.log
377     echo failed 1>&2
378     cp run.log $CDIR"/run.log"
379 edhill 1.6 return 1
380 edhill 1.1 fi
381     )
382     }
383    
384     createcodelet()
385     {
386     # create codelet for comparing model output
387    
388     echo -n "creating the comparison code... "
389 edhill 1.22 cat > tmp_cmpnum.c <<EOF
390     #include <stdio.h>
391     #include <math.h>
392     int main( int argc, char** argv ) {
393     int linnum,best;
394     double a,b,diff;
395     best = -16;
396     while( 1 ) {
397     scanf("%d", &linnum);
398     if (linnum == -1) break;
399     scanf("%lf", &a); scanf("%lf", &b);
400     diff = 0.5*(fabs(a)+fabs(b));
401     if (diff > 1.e-12) {
402     diff=fabs(a-b)/diff;
403     if (diff > 0.0) {
404     linnum = (int)log10(diff);
405     best = (best > linnum) ? best : linnum;
406     }
407     else {
408     if (best == -16 && diff != 0) best = -22;
409     }
410     }
411     }
412     printf("%d\n", -best);
413     return 0;
414     }
415     EOF
416     cc -o tmp_cmpnum tmp_cmpnum.c -lm
417 edhill 1.1
418 edhill 1.22 if [ -x ./tmp_cmpnum ]; then
419 edhill 1.1 echo "OK"
420     return 0
421     else
422     echo
423 edhill 1.21 echo "ERROR: failed to compile comparison code"
424 edhill 1.1 exit 1
425     fi
426     }
427    
428     formatresults()
429     {
430     # formatresults expt genmake depend make run results*
431    
432     nm=$1
433     printf '%s %s %s %s' $2 $3 $4 $5
434     shift; shift; shift; shift; shift;
435     printf '%3s' $@
436    
437     if [ $1 = '--' ]; then
438     printf ' N/O '
439     else
440     if [ $1 -gt 12 ]; then
441     printf ' pass'
442     else
443     printf ' FAIL'
444     fi
445     fi
446     printf ' %s' $nm
447     printf '\n'
448    
449     }
450    
451     show_help()
452     {
453     cat - << EOF
454     $0 [-help] [-quick] [-verbose] dir1 [dir2] [...]
455 edhill 1.10
456     -help|-h Show this help message
457 edhill 1.1 -quiet Reduce the amount of output
458     -verbose Produce copious amounts of output
459     -debug Produce even more output which will mean nothing to most
460     -force Do "make CLEAN" before compiling. This forces a complete rebuild.
461     -clean Do "make CLEAN" after compiling and testing.
462     -cleanup Aggresively removes all model output, executables and object files
463     and then exits. Use with care.
464    
465     Normal usage:
466     $0 * Configure, compile, run and analyze in all experiment directories
467     EOF
468     }
469    
470     scandirs()
471     {
472     if [ $# -eq 0 ]; then
473     for arg in * ; do
474     test -d $arg/input && echo $arg
475     done
476     else
477     echo $*
478     fi
479     }
480    
481    
482     ###############################################################################
483    
484    
485     # Default properties
486     debug=0
487     verbose=1
488     clean=0
489     expts=''
490 edhill 1.6 # ieee=1
491 edhill 1.10
492     IEEE=
493     if test "x$MITGCM_IEEE" != x ; then
494     IEEE=$MITGCM_IEEE
495     fi
496    
497    
498     CLEANUP=f
499     QUICK=f
500     NOGENMAKE=f
501     NOCLEAN=f
502     NODEPEND=f
503 edhill 1.1
504 edhill 1.4 BASH=
505 edhill 1.10 OPTFILE=NONE
506     ADDRESSES=
507 edhill 1.1 TESTDIRS=
508     MPACKDIR="../tools/mpack-1.6"
509 edhill 1.20 HAVE_MPACK=
510 edhill 1.1 MPACK="$MPACKDIR/mpack"
511 edhill 1.24 COMMAND=
512 edhill 1.8 MAKE=make
513 edhill 1.7 MPI=f
514 edhill 1.1
515 edhill 1.24 ADM=
516    
517 edhill 1.1 echo -n "parsing options... "
518    
519     ac_prev=
520     for ac_option ; do
521    
522     # If the previous option needs an argument, assign it.
523     if test -n "$ac_prev"; then
524     eval "$ac_prev=\$ac_option"
525     ac_prev=
526     continue
527     fi
528    
529     ac_optarg=`expr "x$ac_option" : 'x[^=]*=\(.*\)'`
530    
531     case $ac_option in
532    
533     -help | --help | -h | --h)
534     usage ;;
535    
536 edhill 1.2 -optfile | --optfile | -of | --of)
537 edhill 1.10 ac_prev=OPTFILE ;;
538 edhill 1.2 -optfile=* | --optfile=* | -of=* | --of=*)
539 edhill 1.10 OPTFILE=$ac_optarg ;;
540 edhill 1.1
541     -addr | --addr | -a | --a)
542     ac_prev=ADDRESSES ;;
543     -addr=* | --addr=*)
544     ADDRESSES=$ac_optarg ;;
545    
546     -tdir | --tdir | -t | --t)
547     ac_prev=TESTDIRS ;;
548     -tdir=* | --tdir=*)
549     TESTDIRS=$ac_optarg ;;
550 edhill 1.4
551     -bash | --bash | -b | --b)
552     ac_prev=BASH ;;
553     -bash=* | --bash=*)
554     BASH=$ac_optarg ;;
555 edhill 1.5
556 edhill 1.6 -command | --command | -c | --c)
557     ac_prev=COMMAND ;;
558     -command=* | --command=*)
559     COMMAND=$ac_optarg ;;
560 edhill 1.8
561     -make | --make | -m | --m)
562     ac_prev=MAKE ;;
563     -make=* | --make=*)
564     MAKE=$ac_optarg ;;
565 edhill 1.1
566 edhill 1.10 -clean | --clean)
567     CLEANUP=t ;;
568    
569     -quick | --quick | -q | --q)
570     QUICK=t ;;
571     -nogenmake | --nogenmake | -ng | --ng)
572     NOGENMAKE=t ;;
573     -noclean | --noclean | -nc | --nc)
574     NOCLEAN=t ;;
575     -nodepend | --nodepend | -nd | --nd)
576     NODEPEND=t ;;
577    
578 edhill 1.18 -mpi) MPI=t ;;
579 edhill 1.10
580 edhill 1.24 -adm | -ad) ADM=t ;;
581    
582 edhill 1.10 -ieee) IEEE=true ;;
583     -noieee) IEEE= ;;
584    
585 edhill 1.1 -verbose) verbose=2 ;;
586     -debug) debug=1 ;;
587     -quiet) verbose=0 ;;
588    
589     -*)
590     echo "Error: unrecognized option: "$ac_option
591     usage
592     ;;
593    
594     *)
595     echo "Error: unrecognized argument: "$ac_option
596     usage
597     ;;
598    
599     esac
600    
601     done
602    
603 edhill 1.10 if test "x$QUICK" = xt ; then
604     NOGENMAKE=t
605     NOCLEAN=t
606     NODEPEND=t
607     fi
608    
609 edhill 1.1 if test "x$TESTDIRS" = x ; then
610     TESTDIRS=`scandirs`
611     fi
612    
613 edhill 1.10 if test "x$OPTFILE" = xNONE -a "x$MITGCM_OF" != x ; then
614     OPTFILE=$MITGCM_OF
615     fi
616    
617 edhill 1.24 if test "x$ADM" = xt -a "x$COMMAND" = x ; then
618     COMMAND="./mitgcmuv_ad > output.txt_adm 2>&1"
619     fi
620    
621     if test "x$COMMAND" = x ; then
622     COMMAND="make output.txt"
623     fi
624    
625 edhill 1.1 echo "OK"
626    
627     # create the FORTRAN comparison code
628     createcodelet
629    
630     # build the mpack utility
631     build_mpack
632    
633     # Create a uniquely named directory to store results
634     MACH=`hostname`
635 edhill 1.2 UNAMEA=`uname -a`
636 edhill 1.1 DATE=`date +%Y%m%d`
637 edhill 1.25 BASE="tr_"$MACH"_"$DATE"_"
638 edhill 1.1 DNUM=0
639     DRESULTS="$BASE$DNUM"
640     while test -e $DRESULTS ; do
641     DNUM=$(( $DNUM + 1 ))
642     DRESULTS="$BASE$DNUM"
643     done
644     mkdir $DRESULTS
645     RETVAL=$?
646     if test "x$RETVAL" != x0 ; then
647 edhill 1.20 echo "ERROR: Can't create results directory \"./$DRESULTS\""
648 edhill 1.1 exit 1
649     fi
650     SUMMARY="$DRESULTS/summary.txt"
651 edhill 1.13 echo -n "Start time: " >> $SUMMARY
652 edhill 1.16 start_date=`date`
653 edhill 1.17 echo $start_date > $SUMMARY
654 edhill 1.1
655 edhill 1.11 of_path=
656 edhill 1.10 if test "x$OPTFILE" != xNONE ; then
657     if test -r $OPTFILE ; then
658 edhill 1.11 # get the path
659     path=${OPTFILE%/*}
660     if test "x$path" = x ; then
661     of_path=`pwd`
662     else
663     of_path=`( cd $path > /dev/null 2>&1 ; pwd )`
664     fi
665     file=${OPTFILE##*/}
666     OPTFILE=$of_path/$file
667 edhill 1.21 cp $OPTFILE $DRESULTS
668     echo >> $SUMMARY
669     echo " OPTFILE=$OPTFILE" >> $SUMMARY
670 edhill 1.11 else
671 edhill 1.21 echo | tee $SUMMARY
672     echo "ERROR: can't read OPTFILE=\"$OPTFILE\"" | tee $SUMMARY
673     exit 1
674 edhill 1.10 fi
675 edhill 1.21 else
676     echo >> $SUMMARY
677     echo "No \"OPTFILE\" was explicitly specified by testreport," >> $SUMMARY
678     echo " so the genmake default will be used." >> $SUMMARY
679 edhill 1.10 fi
680     echo
681     echo >> $SUMMARY
682 edhill 1.24 if test "x$ADM" = x ; then
683     cat << EOF | tee -a $SUMMARY
684 edhill 1.21 T S U V
685     G D M c m s m s m s m s
686     E p a R g m m e . m m e . m m e . m m e .
687     N n k u 2 i a a d i a a d i a a d i a a d
688     2 d e n d n x n . n x n . n x n . n x n .
689    
690     EOF
691 edhill 1.24 else
692     echo "ADJOINT=true" >> $SUMMARY
693     echo >> $SUMMARY
694     cat << EOF | tee -a $SUMMARY
695     G D M C G
696     E p a R o r
697     N n k u s a
698     2 d e n t d
699    
700     EOF
701     fi
702 edhill 1.1
703 edhill 1.10 # ...and each test directory...
704     for dir in $TESTDIRS ; do
705    
706     # Cleanup only!
707     if test "x$CLEANUP" = xt ; then
708     if test -r $dir/build/Makefile ; then
709     ( cd $dir/build ; make CLEAN )
710     fi
711     if test -r $dir/input/Makefile ; then
712     ( cd $dir/input ; make CLEAN )
713     fi
714     continue
715 edhill 1.1 fi
716 edhill 1.3
717 edhill 1.10 # Verify that the testdir exists and contains previous
718     # results in the correct location--or skip this directory!
719 edhill 1.24 fout=
720     if test "x$ADM" = x ; then
721     fout=$dir"/results/output.txt"
722     else
723     fout=$dir"/results_ad/output.txt_adm"
724     fi
725     if test ! -r $fout ; then
726     echo "can't read \"$fout\" -- skipping $dir"
727 edhill 1.10 continue
728     fi
729 edhill 1.7
730 edhill 1.10 echo "-------------------------------------------------------------------------------"
731     echo
732     echo "Experiment: $dir"
733     echo
734     unset genmake makedepend make run
735     results='-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --'
736 edhill 1.1
737 edhill 1.12 builddir="input"
738     rundir="input"
739     use_seperate_build=0
740     if test -d $dir/build -a -r $dir/build ; then
741     builddir="build"
742     rundir="build"
743     use_seperate_build=1
744     linkdata $use_seperate_build $dir/$rundir
745 edhill 1.10 fi
746    
747 edhill 1.24 if test "x$ADM" = x ; then
748     CODE_DIR=$dir/code
749     else
750     CODE_DIR=$dir/code_ad
751     fi
752 edhill 1.10 BUILD_DIR=$dir/$builddir
753     MPI_FILES="CPP_EEOPTIONS.h_mpi SIZE.h_mpi"
754     NOMPI_FILES="CPP_EEOPTIONS.h_nompi SIZE.h_nompi"
755    
756     # Is this an MPI run?
757     if test "x$MPI" = xt ; then
758     FILES=$MPI_FILES
759     endings="_mpi"
760     else
761     FILES=$NOMPI_FILES
762     endings="_nompi"
763     fi
764    
765     # Check to see that we have the files
766     have_files=t
767     for i in $FILES ; do
768     if test ! -r $CODE_DIR/$i ; then
769     echo "Warning: can't read file $CODE_DIR/$i"
770     have_files=f
771 edhill 1.2 fi
772 edhill 1.10 done
773     if test "x$have_files" != xt -a "x$MPI" = xt ; then
774     echo "Skipping $dir due to lack of input files (see above warning)"
775     continue
776     fi
777    
778     # If we have the $FILES and they differ, copy the $FILES to $BUILD_DIR
779     if test "x$have_files" = xt ; then
780     for i in $FILES ; do
781     sstr="s|$endings||"
782     name=`echo $i | sed -e $sstr `
783     cmp $CODE_DIR/$i $BUILD_DIR/$name > /dev/null 2>&1
784     RETVAL=$?
785     if test "x$RETVAL" != x0 ; then
786     cp $CODE_DIR/$i $BUILD_DIR/$name
787     fi
788     done
789     fi
790    
791     # Create an output dir for each OPTFILE/tdir combination
792 edhill 1.20 rel_CDIR=$DRESULTS"/"$dir
793     mkdir $rel_CDIR
794     CDIR=`pwd`"/$rel_CDIR"
795 edhill 1.10
796     if test "x$CLEANUP" = xt ; then
797     makeclean $dir/$builddir
798     else
799 edhill 1.1 genmakemodel $dir/$builddir && genmake=Y \
800     && makeclean $dir/$builddir \
801     && makedependmodel $dir/$builddir && makedepend=Y \
802     && makemodel $dir/$builddir && make=Y \
803 edhill 1.12 && linkdata $use_seperate_build $dir/$rundir \
804     && runmodel $dir/$rundir && run=Y \
805 edhill 1.1 && results=`testoutput $dir $rundir`
806 edhill 1.10 fi
807    
808     echo
809 edhill 1.24 if test "x$ADM" = x ; then
810     fres=`formatresults $dir ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N} $results`
811     else
812     fres=`printf '%s %s %s %s' ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N}`
813     fres=$fres"$results $dir"
814     fi
815 edhill 1.10 echo
816 edhill 1.21 echo "$fres" >> $SUMMARY
817     echo "fresults='$fres'" > $CDIR"/summary.txt"
818 edhill 1.10 echo "MACH='$MACH'" >> $CDIR"/summary.txt"
819     echo "UNAMEA='$UNAMEA'" >> $CDIR"/summary.txt"
820     echo "DATE='$DATE'" >> $CDIR"/summary.txt"
821     echo "tdir='$dir'" >> $CDIR"/summary.txt"
822    
823     echo "-------------------------------------------------------------------------------"
824    
825 edhill 1.1 done
826    
827 edhill 1.13 echo -n "Start time: " >> $SUMMARY
828 edhill 1.16 echo $start_date >> $SUMMARY
829 edhill 1.13 echo -n "End time: " >> $SUMMARY
830     date >> $SUMMARY
831 edhill 1.20
832     # If addresses were supplied and mpack built successfully, then try
833     # to send email using mpack.
834     if test "x$ADDRESSES" = xNONE -o "x$ADDRESSES" = x ; then
835     echo "No results email was sent."
836     else
837     if test "x$HAVE_MPACK" = xt ; then
838     tar -cf $DRESULTS".tar" $DRESULTS > /dev/null 2>&1 \
839     && gzip $DRESULTS".tar" \
840     && $MPACK -s MITgcm-test -m 1500000 $DRESULTS".tar.gz" $ADDRESSES
841     RETVAL=$?
842     if test "x$RETVAL" != x0 ; then
843     echo
844     echo "Warning: The tar, gzip, & mpack step failed. Please send email"
845     echo " to <MITgcm-support@mitgcm.org> for help. You may copy the "
846     echo " summary of results from the directory \"$DRESULTS\"."
847     echo
848     else
849     echo
850     echo "An email containing results was sent to the following addresses:"
851     echo " \"$ADDRESSES\""
852     echo
853     fi
854     test -f $DRESULTS".tar" && rm -f $DRESULTS".tar"
855     test -f $DRESULTS".tar.gz" && rm -f $DRESULTS".tar.gz"
856     fi
857     fi
858 edhill 1.13
859 edhill 1.22 # rm -f tmp_cmpnum.f a.out
860     rm -f tmp_cmpnum.c tmp_cmpnum
861 edhill 1.1
862 edhill 1.12 if test "x$CLEANUP" != xt ; then
863     cat $SUMMARY
864 edhill 1.25 if test -e tr_out.txt ; then
865     mv tr_out.txt tr_out.txt.old
866 edhill 1.14 fi
867 edhill 1.25 cat $SUMMARY > tr_out.txt
868 edhill 1.12 fi
869 edhill 1.1

  ViewVC Help
Powered by ViewVC 1.1.22