15 |
echo " (-mpi) compile and run using MPI" |
echo " (-mpi) compile and run using MPI" |
16 |
echo " (-ieee|-noieee) if possible, use IEEE compiler flags" |
echo " (-ieee|-noieee) if possible, use IEEE compiler flags" |
17 |
echo " (DEF=\"-ieee\")" |
echo " (DEF=\"-ieee\")" |
18 |
|
echo " (-gsl) compile with \"-gsl\" flag" |
19 |
echo " (-of=|-optfile=)STRING list of optfiles to use" |
echo " (-of=|-optfile=)STRING list of optfiles to use" |
20 |
echo " (-a|-addr) STRING list of email recipients" |
echo " (-a|-addr) STRING list of email recipients" |
21 |
echo " (DEF=\"edhill@mitgcm.org\")" |
echo " (DEF=\"\" no email is sent)" |
22 |
|
echo " (-mpd|-mpackdir) DIR location of the mpack utility" |
23 |
|
echo " (DEF=\"../tools/mpack-1.6\")" |
24 |
echo " (-t|-tdir) STRING list of group and/or exp. dirs to test" |
echo " (-t|-tdir) STRING list of group and/or exp. dirs to test" |
25 |
echo " (recognized groups: basic, tutorials)" |
echo " (recognized groups: basic, tutorials)" |
26 |
echo " (DEF=\"\" which test all)" |
echo " (DEF=\"\" which test all)" |
30 |
echo " Bourne-compatible \"sh\" shell" |
echo " Bourne-compatible \"sh\" shell" |
31 |
echo " (DEF=\"\" for \"bash\")" |
echo " (DEF=\"\" for \"bash\")" |
32 |
echo " (-adm|-ad) perform an adjoint run" |
echo " (-adm|-ad) perform an adjoint run" |
33 |
|
echo " (-oad) perform an OpenAD adjoint run" |
34 |
echo " (-command) STRING command to run" |
echo " (-command) STRING command to run" |
35 |
echo " (DEF=\"make output.txt\")" |
echo " (DEF=\"make output.txt\")" |
36 |
echo " (-m|-make) STRING command to use for \"make\"" |
echo " (-m|-make) STRING command to use for \"make\"" |
68 |
build_mpack() |
build_mpack() |
69 |
{ |
{ |
70 |
printf "building the mpack utility... " |
printf "building the mpack utility... " |
71 |
if test ! -x "$MPACKDIR/mpack" ; then |
MPACK="$MPACKDIR/mpack" |
72 |
|
if test ! -x $MPACK ; then |
73 |
if test ! -d $MPACKDIR ; then |
if test ! -d $MPACKDIR ; then |
74 |
echo |
echo |
75 |
echo "Error: can't find \"$MPACKDIR\"" |
echo "Error: can't find \"$MPACKDIR\"" |
78 |
echo |
echo |
79 |
HAVE_MPACK=f |
HAVE_MPACK=f |
80 |
fi |
fi |
|
printf "building mpack... " |
|
81 |
if test "x$CC" = x ; then |
if test "x$CC" = x ; then |
82 |
export CC=cc |
export CC=cc |
83 |
fi |
fi |
84 |
|
printf "building mpack (using CC=$CC)... " |
85 |
( cd $MPACKDIR && ./configure && $MAKE ) > tr_build_mpack.out 2>&1 |
( cd $MPACKDIR && ./configure && $MAKE ) > tr_build_mpack.out 2>&1 |
86 |
RETVAL=$? |
RETVAL=$? |
87 |
if test "x$RETVAL" != x0 ; then |
if test "x$RETVAL" != x0 ; then |
92 |
else |
else |
93 |
rm -f tr_build_mpack.out |
rm -f tr_build_mpack.out |
94 |
HAVE_MPACK=t |
HAVE_MPACK=t |
95 |
|
echo "done" |
96 |
fi |
fi |
97 |
else |
else |
98 |
HAVE_MPACK=t |
HAVE_MPACK=t |
99 |
|
echo "already exist" |
100 |
fi |
fi |
|
echo "OK" |
|
101 |
} |
} |
102 |
|
|
103 |
testoutput_var() |
testoutput_var() |
180 |
return $digits_of_similarity |
return $digits_of_similarity |
181 |
} |
} |
182 |
|
|
|
dashnum() |
|
|
{ |
|
|
# dashnum n1 n2 n3 ... |
|
|
# |
|
|
# print numbers using %3i format or "--" if number = 99 |
|
|
|
|
|
for num in $@ ; do |
|
|
if [ $num = 99 ]; then |
|
|
printf ' --' |
|
|
else |
|
|
printf '%3i' $num |
|
|
fi |
|
|
done |
|
|
} |
|
|
|
|
|
check_for_add_mon_output() |
|
|
{ |
|
|
# Check for additional types of monitor output |
|
|
if test "x$1" = x ; then |
|
|
return |
|
|
fi |
|
|
|
|
|
for ii in $PTRACERS_NUM ; do |
|
|
eval "HAVE_PTR0"$ii"=f" |
|
|
done |
|
|
|
|
|
ptr_add="trcstat_ptracerXX_min trcstat_ptracerXX_max" |
|
|
ptr_add="$ptr_add trcstat_ptracerXX_mean trcstat_ptracerXX_sd" |
|
|
for ii in $PTRACERS_NUM ; do |
|
|
for jj in $ptr_add ; do |
|
|
name=`eval "echo $jj | sed -e 's|XX|0"$ii"|g'"` |
|
|
tst=`grep $name $1 | wc -l | awk '{print $1}'` |
|
|
if test ! "x$tst" = x0 ; then |
|
|
eval "HAVE_PTR0"$ii"=t" |
|
|
fi |
|
|
done |
|
|
# eval 'echo "HAVE_PTR0'$ii' = $HAVE_PTR0'$ii'"' |
|
|
done |
|
|
} |
|
|
|
|
183 |
testoutput_run() |
testoutput_run() |
184 |
{ |
{ |
185 |
# testoutput_run directory subdir reference_output |
# testoutput_run directory subdir reference_output |
197 |
listVar=`echo $listChk | sed 's/ [a-zA-Z0-9]*+/&mn &mx &av &sd/g' \ |
listVar=`echo $listChk | sed 's/ [a-zA-Z0-9]*+/&mn &mx &av &sd/g' \ |
198 |
| sed 's/+//g' | sed "s/^$sVar//"` |
| sed 's/+//g' | sed "s/^$sVar//"` |
199 |
if [ $debug -gt 0 ]; then echo "testoutput_run: listVar(I)='$listVar'" 1>&2 ; fi |
if [ $debug -gt 0 ]; then echo "testoutput_run: listVar(I)='$listVar'" 1>&2 ; fi |
200 |
for ii in 1 2 3 4 5 6 7 8 9 ; do |
# check for ptracer output in reference_output file : |
201 |
tst=`eval 'echo "$HAVE_PTR0'$ii'"'` |
outpref=$1/results/$3 |
202 |
#echo "-- ptr test=" $tst "number of var=" `echo $listVar | awk '{print NF}'` 1>&2 |
ptr_mon="trcstat_ptracerXX_min trcstat_ptracerXX_max" |
203 |
if test "x$tst" != xt ; then listVar=`echo "$listVar" | sed "s/ pt$ii..//g"` ; fi |
ptr_mon="$ptr_mon trcstat_ptracerXX_mean trcstat_ptracerXX_sd" |
204 |
done |
for ii in $PTRACERS_NUM ; do |
205 |
tst=`echo $sVar $listVar | awk '{ for(i=2;i<=NF;i++){t+=($i==$1)}; print t }'` |
ptrfound=0 |
206 |
|
for jj in $ptr_mon ; do |
207 |
|
name=`eval "echo $jj | sed -e 's|XX|0"$ii"|g'"` |
208 |
|
tst=`grep $name $outpref | wc -l | awk '{print $1}'` |
209 |
|
if test ! "x$tst" = x0 ; then ptrfound=1 ; fi |
210 |
|
done |
211 |
|
if test $ptrfound = '1' ; then |
212 |
|
eval "HAVE_PTR0"$ii"=t" |
213 |
|
else |
214 |
|
eval "HAVE_PTR0"$ii"=f" |
215 |
|
if test "x$ADM" = x -a "x$OADM" = x; then |
216 |
|
# remove this ptr from the list of output variable to check |
217 |
|
# echo "-- ptr test=" $tst "number of var=" `echo $listVar | awk '{print NF}'` 1>&2 |
218 |
|
listVar=`echo "$listVar" | sed "s/ pt$ii..//g"` |
219 |
|
fi |
220 |
|
fi |
221 |
|
# eval 'echo "HAVE_PTR0'$ii' = $HAVE_PTR0'$ii'"' 1>&2 |
222 |
|
done |
223 |
|
tst=`echo $sVar $listVar | awk '{ for(i=2;i<=NF;i++){if($i==$1)t+=1}; print t }'` |
224 |
if test $tst != 1 ; then |
if test $tst != 1 ; then |
225 |
if test $tst = 0 ; then echo "==> WARNING: selected var >$sVar< not found" 1>&2 |
if test $tst = 0 ; then echo "==> WARNING: selected var >$sVar< not found" 1>&2 |
226 |
else echo "==> WARNING: found selected var >$sVar< $tst times" 1>&2 ; fi |
else echo "==> WARNING: found selected var >$sVar< $tst times" 1>&2 ; fi |
315 |
( |
( |
316 |
cd $1; |
cd $1; |
317 |
command="$GENMAKE2 -ds -m $MAKE" |
command="$GENMAKE2 -ds -m $MAKE" |
318 |
if test "x$ADM" = x ; then |
if test "x$ADM" = xt ; then |
|
command="$command --mods=../code" |
|
|
else |
|
319 |
command="$command --mods=../code_ad" |
command="$command --mods=../code_ad" |
320 |
|
elif test "x$OADM" = xt ; then |
321 |
|
command="$command -adof ../../../tools/adjoint_options/adjoint_oad -mods '../code_oad ../../OpenAD/code_oad_all'" |
322 |
|
else |
323 |
|
command="$command --mods=../code" |
324 |
fi |
fi |
325 |
if test "x$OPTFILE" != xNONE ; then |
if test "x$OPTFILE" != xNONE ; then |
326 |
command="$command --optfile=$OPTFILE" |
command="$command --optfile=$OPTFILE" |
328 |
if test "x$IEEE" != x ; then |
if test "x$IEEE" != x ; then |
329 |
command="$command -ieee" |
command="$command -ieee" |
330 |
fi |
fi |
331 |
|
if test "x$GSL" = xt ; then |
332 |
|
command="$command -gsl" |
333 |
|
fi |
334 |
if test "x$MPI" = xt ; then |
if test "x$MPI" = xt ; then |
335 |
command="$command -mpi" |
command="$command -mpi" |
336 |
fi |
fi |
345 |
fi |
fi |
346 |
fi |
fi |
347 |
printf 'genmake ... ' 1>&2 |
printf 'genmake ... ' 1>&2 |
348 |
$command > make.log 2>&1 |
# $command > make.log 2>&1 |
349 |
|
eval $command > make.log 2>&1 |
350 |
RETVAL=$? |
RETVAL=$? |
351 |
# Reduce the size of the testing emails! |
# Reduce the size of the testing emails! |
352 |
head -100 Makefile > $CDIR/Makefile_head |
head -100 Makefile > $CDIR/Makefile_head |
441 |
cd $1; |
cd $1; |
442 |
if test -r Makefile ; then |
if test -r Makefile ; then |
443 |
printf 'make ... ' 1>&2 |
printf 'make ... ' 1>&2 |
444 |
if test "x$ADM" = x ; then |
if test "x$ADM" = xt ; then |
445 |
|
$MAKE adall >> make.log 2>&1 |
446 |
|
elif test "x$OADM" = xt ; then |
447 |
|
$MAKE adAll >> make.log 2>&1 |
448 |
|
else |
449 |
if test "x$JOBS" = x ; then |
if test "x$JOBS" = x ; then |
450 |
$MAKE >> make.log 2>&1 |
$MAKE >> make.log 2>&1 |
451 |
else |
else |
452 |
$MAKE -j $JOBS >> make.log 2>&1 |
$MAKE -j $JOBS >> make.log 2>&1 |
453 |
fi |
fi |
|
else |
|
|
$MAKE adall >> make.log 2>&1 |
|
454 |
fi |
fi |
455 |
RETVAL=$? |
RETVAL=$? |
456 |
if test "x$RETVAL" != x0 ; then |
if test "x$RETVAL" != x0 ; then |
477 |
CODE_DIR=$dir/$code_dir |
CODE_DIR=$dir/$code_dir |
478 |
|
|
479 |
# These are files that should replace their counter-part when using -mpi |
# These are files that should replace their counter-part when using -mpi |
480 |
MPI_FILES=`(cd $CODE_DIR; find . -name "*_mpi")` |
MPI_FILES=`(cd $CODE_DIR; find . -name "*_mpi" -print)` |
481 |
|
|
482 |
# Is this an MPI run? |
# Is this an MPI run? |
483 |
if test "x$MPI" = xt ; then |
if test "x$MPI" = xt ; then |
535 |
if test -h eedata ; then rm -f eedata ; fi |
if test -h eedata ; then rm -f eedata ; fi |
536 |
fi |
fi |
537 |
fi |
fi |
538 |
|
prevDir='NONE' |
539 |
for ldir in $* ; do |
for ldir in $* ; do |
540 |
if test -d "../"$ldir ; then |
if test -d "../"$ldir -a $ldir != $prevDir ; then |
541 |
printf 'ldir='${ldir} 1>&2 |
printf 'ldir='${ldir} 1>&2 |
542 |
files=`( cd "../"$ldir ; ls -1 | grep -v CVS )` |
files=`( cd "../"$ldir ; ls -1 | grep -v CVS )` |
543 |
for i in $files ; do |
for i in $files ; do |
553 |
fi |
fi |
554 |
printf ' ; ' 1>&2 |
printf ' ; ' 1>&2 |
555 |
fi |
fi |
556 |
|
prevDir=$ldir |
557 |
done |
done |
558 |
) |
) |
559 |
fi |
fi |
572 |
echo |
echo |
573 |
if test -L $EXECUTABLE -a -x "../"$builddir"/"$EXECUTABLE ; then |
if test -L $EXECUTABLE -a -x "../"$builddir"/"$EXECUTABLE ; then |
574 |
diff -q $EXECUTABLE "../"$builddir"/"$EXECUTABLE > /dev/null 2>&1 |
diff -q $EXECUTABLE "../"$builddir"/"$EXECUTABLE > /dev/null 2>&1 |
575 |
outD=$? ; if test $outD != 0 ; then rm -f $EXECUTABLE ; rm -f run.log ; fi |
outD=$? ; if test $outD != 0 ; then rm -f $EXECUTABLE ; fi |
576 |
fi |
fi |
577 |
if test ! -x $EXECUTABLE -a -x "../"$builddir"/"$EXECUTABLE ; then |
if test ! -x $EXECUTABLE -a -x "../"$builddir"/"$EXECUTABLE ; then |
578 |
echo " link" $EXECUTABLE "from dir ../"$builddir > run.log_00 |
echo " link" $EXECUTABLE "from dir ../"$builddir > run.log_tmp |
579 |
ln -sf "../"$builddir"/"$EXECUTABLE . |
ln -sf "../"$builddir"/"$EXECUTABLE . |
580 |
fi |
fi |
581 |
if test ! -x $EXECUTABLE ; then |
if test ! -x $EXECUTABLE ; then |
582 |
rm -f run.log ; touch run.log |
rm -f $RUNLOG ; touch $RUNLOG |
583 |
if test -f run.log_00 ; then cat run.log_00 >> run.log ; fi |
if test -f run.log_tmp ; then cat run.log_tmp >> $RUNLOG ; fi |
584 |
echo " no executable:" $EXECUTABLE >> run.log |
echo " no executable:" $EXECUTABLE >> $RUNLOG |
585 |
RETVAL=8 |
RETVAL=8 |
586 |
ENDVAL=-1 |
ENDVAL=-1 |
587 |
else |
else |
588 |
if test ! -f $OUTPUTFILE -o $OUTPUTFILE -ot $EXECUTABLE ; then |
if test ! -f $OUTPUTFILE -o $OUTPUTFILE -ot $EXECUTABLE ; then |
589 |
# output do not exist or is older than executable: |
# output do not exist or is older than executable: |
590 |
rm -f run.log ; touch run.log |
rm -f $RUNLOG ; touch $RUNLOG |
591 |
if test -f run.log_00 ; then cat run.log_00 >> run.log ; fi |
if test -f run.log_tmp ; then cat run.log_tmp >> $RUNLOG ; fi |
592 |
( eval $COMMAND ) >> run.log 2>&1 |
( eval $COMMAND ) >> $RUNLOG 2>&1 |
593 |
RETVAL=$? |
RETVAL=$? |
594 |
else |
else |
595 |
RETVAL=0 |
RETVAL=0 |
596 |
if test -f run.log ; then |
if test -f $RUNLOG ; then |
597 |
if test -f run.log_00 ; then cat run.log_00 >> run.log ; fi |
if test -f run.log_tmp ; then cat run.log_tmp >> $RUNLOG ; fi |
598 |
echo "---------->> $OUTPUTFILE is up to date " >> run.log 2>&1 |
echo "---------->> $OUTPUTFILE is up to date " >> $RUNLOG 2>&1 |
599 |
else |
else |
600 |
touch run.log |
touch $RUNLOG |
601 |
if test -f run.log_00 ; then cat run.log_00 >> run.log ; fi |
if test -f run.log_tmp ; then cat run.log_tmp >> $RUNLOG ; fi |
602 |
echo "---------->> $OUTPUTFILE is up to date " >> run.log 2>&1 |
echo "---------->> $OUTPUTFILE is up to date " >> $RUNLOG 2>&1 |
603 |
echo " no previous run.log: assume NORMAL END" >> run.log 2>&1 |
echo " no previous $RUNLOG: assume NORMAL END" >> $RUNLOG 2>&1 |
604 |
fi |
fi |
605 |
fi |
fi |
606 |
ENDVAL=`cat run.log | grep -v 'ABNORMAL END' | grep -c 'NORMAL END'` |
ENDVAL=`cat $RUNLOG | grep -v 'ABNORMAL END' | grep -c 'NORMAL END'` |
607 |
fi |
fi |
608 |
rm -f run.log_00 |
rm -f run.log_tmp |
609 |
#if test "x$RETVAL" = x0 ; then |
#if test "x$RETVAL" = x0 ; then |
610 |
if [ $RETVAL -eq 0 -a $ENDVAL -gt 0 ] ; then |
if [ $RETVAL -eq 0 -a $ENDVAL -gt 0 ] ; then |
611 |
tail run.log |
tail $RUNLOG |
612 |
echo successful 1>&2 |
echo successful 1>&2 |
613 |
# === Reduce the size of the testing emails! |
# === Reduce the size of the testing emails! |
614 |
#cp $OUTPUTFILE $CDIR"/"$OUTPUTFILE |
#cp $OUTPUTFILE $CDIR"/"$OUTPUTFILE |
615 |
if test -s STDERR.0000 ; then cp STDERR.0000 $CDIR"/STDERR.0000" ; fi |
if test -s STDERR.0000 ; then cp STDERR.0000 $CDIR"/STDERR.0000" ; fi |
616 |
return 0 |
return 0 |
617 |
else |
else |
618 |
tail run.log |
tail $RUNLOG |
619 |
echo failed '(run:' $RETVAL ' end:' $ENDVAL ')' 1>&2 |
echo failed '(run:' $RETVAL ' end:' $ENDVAL ')' 1>&2 |
620 |
cp run.log $CDIR"/run.log" |
cp $RUNLOG $CDIR"/"$RUNLOG |
621 |
if test -s STDERR.0000 ; then cp STDERR.0000 $CDIR"/STDERR.0000" ; fi |
if test -s STDERR.0000 ; then cp STDERR.0000 $CDIR"/STDERR.0000" ; fi |
622 |
return 1 |
return 1 |
623 |
fi |
fi |
628 |
{ |
{ |
629 |
# create codelet for comparing model output |
# create codelet for comparing model output |
630 |
|
|
631 |
printf "creating the comparison code... " |
printf "creating the comparison code (using CC=$CC)... " |
632 |
cat > tr_cmpnum.c <<EOF |
cat > tr_cmpnum.c <<EOF |
633 |
#include <stdio.h> |
#include <stdio.h> |
634 |
#include <math.h> |
#include <math.h> |
725 |
debug=0 |
debug=0 |
726 |
verbose=1 |
verbose=1 |
727 |
clean=0 |
clean=0 |
|
expts='' |
|
|
# ieee=1 |
|
728 |
|
|
729 |
IEEE=true |
IEEE=true |
730 |
if test "x$MITGCM_IEEE" != x ; then |
if test "x$MITGCM_IEEE" != x ; then |
731 |
IEEE=$MITGCM_IEEE |
IEEE=$MITGCM_IEEE |
732 |
fi |
fi |
733 |
|
GSL=f |
734 |
|
|
735 |
CLEANUP=f |
CLEANUP=f |
736 |
QUICK=f |
QUICK=f |
746 |
SKIPDIRS= |
SKIPDIRS= |
747 |
MPACKDIR="../tools/mpack-1.6" |
MPACKDIR="../tools/mpack-1.6" |
748 |
HAVE_MPACK= |
HAVE_MPACK= |
749 |
MPACK="$MPACKDIR/mpack" |
MPACK= |
750 |
COMMAND= |
COMMAND= |
751 |
if test "x$MAKE" = x ; then |
if test "x$MAKE" = x ; then |
752 |
MAKE=make |
MAKE=make |
761 |
DELDIR= |
DELDIR= |
762 |
|
|
763 |
ADM= |
ADM= |
764 |
|
OADM= |
765 |
|
|
766 |
# Additional monitor types |
# list of pTracers to check for monitor output |
767 |
PTRACERS_NUM="1 2 3 4 5" |
PTRACERS_NUM="1 2 3 4 5" |
768 |
|
|
769 |
MATCH_CRIT=13 |
MATCH_CRIT=13 |
796 |
ac_prev=ADDRESSES ;; |
ac_prev=ADDRESSES ;; |
797 |
-addr=* | --addr=*) |
-addr=* | --addr=*) |
798 |
ADDRESSES=$ac_optarg ;; |
ADDRESSES=$ac_optarg ;; |
799 |
|
-mpackdir | --mpackdir | -mpd | --mpd) |
800 |
|
ac_prev=MPACKDIR ;; |
801 |
|
-mpackdir=* | --mpackdir=* | -mpd=* | --mpd=*) |
802 |
|
MPACKDIR=$ac_optarg ;; |
803 |
|
|
804 |
-tdir | --tdir | -t | --t) |
-tdir | --tdir | -t | --t) |
805 |
ac_prev=TESTDIRS ;; |
ac_prev=TESTDIRS ;; |
863 |
|
|
864 |
-adm | -ad) ADM=t ;; |
-adm | -ad) ADM=t ;; |
865 |
|
|
866 |
|
-oad) OADM=t; NODEPEND=t ;; |
867 |
|
|
868 |
-ieee) IEEE=true ;; |
-ieee) IEEE=true ;; |
869 |
-noieee) IEEE= ;; |
-noieee) IEEE= ;; |
870 |
|
-gsl) GSL=t ;; |
871 |
|
|
872 |
-verbose) verbose=2 ;; |
-verbose) verbose=2 ;; |
873 |
-debug) debug=1 ;; |
-debug) debug=1 ;; |
904 |
#- setting for forward or ADM testing |
#- setting for forward or ADM testing |
905 |
if test "x$ADM" = xt ; then |
if test "x$ADM" = xt ; then |
906 |
code_dir=code_ad |
code_dir=code_ad |
907 |
input_dirs='input_ad input' |
inputdir=input_ad |
908 |
ref_outp="output_adm.txt" |
ref_outp="output_adm.txt" |
909 |
EXECUTABLE="mitgcmuv_ad" |
EXECUTABLE="mitgcmuv_ad" |
910 |
|
elif test "x$OADM" = xt ; then |
911 |
|
code_dir=code_oad |
912 |
|
inputdir=input_oad |
913 |
|
ref_outp="output_oadm.txt" |
914 |
|
EXECUTABLE="mitgcmuv_ad" |
915 |
else |
else |
916 |
code_dir=code |
code_dir=code |
917 |
input_dirs='input' |
inputdir=input |
918 |
ref_outp="output.txt" |
ref_outp="output.txt" |
919 |
EXECUTABLE="mitgcmuv" |
EXECUTABLE="mitgcmuv" |
920 |
fi |
fi |
964 |
OPTFILE=$MITGCM_OF |
OPTFILE=$MITGCM_OF |
965 |
fi |
fi |
966 |
|
|
967 |
|
RUNLOG="run.log" |
968 |
OUTPUTFILE=$ref_outp |
OUTPUTFILE=$ref_outp |
969 |
if test "x$COMMAND" = x ; then |
if test "x$COMMAND" = x ; then |
970 |
COMMAND="./$EXECUTABLE > $OUTPUTFILE" |
COMMAND="./$EXECUTABLE > $OUTPUTFILE" |
979 |
# (use default or load experiment-specific list from file "tr_checklist") |
# (use default or load experiment-specific list from file "tr_checklist") |
980 |
# content : 1rst = main variable used to decide if it pass or FAIL |
# content : 1rst = main variable used to decide if it pass or FAIL |
981 |
# others = number of matching digits to be printed in summary.txt |
# others = number of matching digits to be printed in summary.txt |
982 |
if test "x$ADM" = x ; then |
if test "x$ADM" = x -a "x$OADM" = x; then |
983 |
DEF_CHECK_LIST='PS PS T+ S+ U+ V+ pt1+ pt2+ pt3+ pt4+ pt5+' |
DEF_CHECK_LIST='PS PS T+ S+ U+ V+ pt1+ pt2+ pt3+ pt4+ pt5+' |
984 |
EMPTY_RESULTS='.. .. .. .. .. .. .. .. .. .. .. .. .. .. .. .. ..' |
EMPTY_RESULTS='.. .. .. .. .. .. .. .. .. .. .. .. .. .. .. .. ..' |
985 |
LEN_CHECK_LIST=`echo $DEF_CHECK_LIST | sed 's/ [a-zA-Z0-9]*+/&mn &mx &av &sd/g' | awk '{print NF-1}'` |
LEN_CHECK_LIST=`echo $DEF_CHECK_LIST | sed 's/ [a-zA-Z0-9]*+/&mn &mx &av &sd/g' | awk '{print NF-1}'` |
994 |
# create the FORTRAN comparison code |
# create the FORTRAN comparison code |
995 |
createcodelet |
createcodelet |
996 |
|
|
997 |
# build the mpack utility |
# build the mpack utility (if ADDRESSES = NONE, do it to test the build) |
998 |
if test "x$ADDRESSES" = xNONE -o "x$ADDRESSES" = x ; then |
if test "x$ADDRESSES" = x ; then |
999 |
echo "skipping mpack build" |
echo "skipping mpack build" |
1000 |
else |
else |
1001 |
build_mpack |
build_mpack |
1002 |
fi |
fi |
1003 |
|
|
1004 |
# Create a uniquely named directory to store results |
# Create a uniquely named directory to store results |
1005 |
|
CMDLINE=$0 |
1006 |
|
for xx in "$@" ; do nw=`echo $xx | wc -w` |
1007 |
|
if test $nw = '1' ; then CMDLINE="$CMDLINE $xx" |
1008 |
|
else CMDLINE="$CMDLINE '$xx'" ; fi |
1009 |
|
done |
1010 |
|
#for xx in "$@" ; do CMDLINE="$CMDLINE '$xx'" ; done |
1011 |
MACH=`hostname` |
MACH=`hostname` |
1012 |
UNAMEA=`uname -a` |
UNAMEA=`uname -a` |
1013 |
DATE=`date +%Y%m%d` |
DATE=`date +%Y%m%d` |
1014 |
BASE="tr_"$MACH"_"$DATE"_" |
BASE="tr_"$MACH"_"$DATE"_" |
1015 |
if test "x$OUTDIR" != x ; then |
if test "x$OUTDIR" != x ; then |
1016 |
BASE="tr_"$OUTDIR"_"$DATE"_" |
BASE="tr_"$OUTDIR"_"$DATE"_" |
1017 |
|
else |
1018 |
|
short_name=`hostname | sed 's/\..*$//'` |
1019 |
|
BASE="tr_"$short_name"_"$DATE"_" |
1020 |
fi |
fi |
1021 |
DNUM=0 |
DNUM=0 |
1022 |
DRESULTS="$BASE$DNUM" |
DRESULTS="$BASE$DNUM" |
1031 |
exit 1 |
exit 1 |
1032 |
fi |
fi |
1033 |
SUMMARY="$DRESULTS/summary.txt" |
SUMMARY="$DRESULTS/summary.txt" |
|
printf "Start time: " >> $SUMMARY |
|
1034 |
start_date=`date` |
start_date=`date` |
1035 |
echo $start_date > $SUMMARY |
echo $start_date > $SUMMARY |
1036 |
|
echo 'run:' $CMDLINE >> $SUMMARY |
1037 |
|
echo 'on :' $UNAMEA >> $SUMMARY |
1038 |
|
|
1039 |
of_path= |
of_path= |
1040 |
if test "x$OPTFILE" != xNONE ; then |
if test "x$OPTFILE" != xNONE ; then |
1063 |
fi |
fi |
1064 |
echo |
echo |
1065 |
echo >> $SUMMARY |
echo >> $SUMMARY |
1066 |
if test "x$ADM" = x ; then |
if test "x$ADM" = x -a "x$OADM" = x; then |
1067 |
if [ $MATCH_CRIT -lt 10 ] ; |
if [ $MATCH_CRIT -lt 10 ] ; |
1068 |
then line_0="default "$MATCH_CRIT ; |
then line_0="default "$MATCH_CRIT ; |
1069 |
else line_0="default "$MATCH_CRIT ; fi |
else line_0="default "$MATCH_CRIT ; fi |
1074 |
line_3="N n k u 2 i a a d i a a d i a a d i a a d" |
line_3="N n k u 2 i a a d i a a d i a a d i a a d" |
1075 |
line_4="2 d e n d n x n . n x n . n x n . n x n ." |
line_4="2 d e n d n x n . n x n . n x n . n x n ." |
1076 |
for ii in $PTRACERS_NUM ; do |
for ii in $PTRACERS_NUM ; do |
|
# tst=`eval 'echo $HAVE_PTR0'$ii` |
|
|
# if test "x$tst" = xt ; then |
|
1077 |
line_0="$line_0 --PTR 0"$ii"--" |
line_0="$line_0 --PTR 0"$ii"--" |
1078 |
line_1="$line_1 m s" |
line_1="$line_1 m s" |
1079 |
line_2="$line_2 m m e ." |
line_2="$line_2 m m e ." |
1080 |
line_3="$line_3 i a a d" |
line_3="$line_3 i a a d" |
1081 |
line_4="$line_4 n x n ." |
line_4="$line_4 n x n ." |
|
# fi |
|
1082 |
done |
done |
1083 |
echo "$line_0" | tee -a $SUMMARY |
echo "$line_0" | tee -a $SUMMARY |
1084 |
echo "$line_1" | tee -a $SUMMARY |
echo "$line_1" | tee -a $SUMMARY |
1118 |
# Cleanup only! |
# Cleanup only! |
1119 |
if test "x$CLEANUP" = xt ; then |
if test "x$CLEANUP" = xt ; then |
1120 |
if test -r $BUILD_DIR/Makefile ; then |
if test -r $BUILD_DIR/Makefile ; then |
1121 |
echo ' ------ clean dir:' $dir/build |
echo ' ------ clean dir:' $dir/$builddir |
1122 |
( cd $BUILD_DIR ; make CLEAN ) |
( cd $BUILD_DIR ; make CLEAN ) |
1123 |
fi |
fi |
1124 |
if test -d $dir/$rundir/CVS ; then |
if test -d $dir/$rundir/CVS ; then |
1139 |
echo "can't read \"$fout\" -- skipping $dir" |
echo "can't read \"$fout\" -- skipping $dir" |
1140 |
continue |
continue |
1141 |
fi |
fi |
|
if test "x$ADM" = x ; then |
|
|
check_for_add_mon_output $fout |
|
|
fi |
|
1142 |
|
|
1143 |
# Check for additional types of monitor output |
# Check for specific files for particular type of run |
1144 |
|
|
1145 |
if test ! -r $CODE_DIR"/SIZE.h_mpi" -a "x$MPI" = "xt" ; then |
if test ! -r $CODE_DIR"/SIZE.h_mpi" -a "x$MPI" = "xt" ; then |
1146 |
echo "can't find \"$CODE_DIR/SIZE.h_mpi\" -- skipping $dir" |
echo "can't find \"$CODE_DIR/SIZE.h_mpi\" -- skipping $dir" |
1153 |
|
|
1154 |
# Check whether there are "extra runs" for this testdir |
# Check whether there are "extra runs" for this testdir |
1155 |
extra_runs= |
extra_runs= |
1156 |
if test "x$ADM" = x ; then |
ex_run_dirs=`( cd $dir ; echo $inputdir.* )` |
1157 |
ex_run_dirs=`( cd $dir ; echo input.* )` |
#echo "ex_run_dirs='$ex_run_dirs'" |
1158 |
#echo "ex_run_dirs='$ex_run_dirs'" |
for exd in $ex_run_dirs ; do |
1159 |
for exd in $ex_run_dirs ; do |
name=`echo $exd | sed -e "s/$inputdir\.//"` |
1160 |
name=`echo $exd | sed -e 's/input.//g'` |
refExOut=`echo $ref_outp | sed "s/\./.${name}./"` |
1161 |
outf="$dir/results/output.$name.txt" |
outf="$dir/results/$refExOut" |
1162 |
if test -f $outf -a -r $outf ; then |
if test -f $outf -a -r $outf ; then |
1163 |
if test "x$MULTI_THREAD" = "xt" ; then |
if test "x$MULTI_THREAD" = "xt" ; then |
1164 |
if test -r $dir"/"$exd"/eedata.mth" ; then |
if test -r $dir"/"$exd"/eedata.mth" ; then |
|
extra_runs="$extra_runs $name" |
|
|
#else echo $dir"/"$exd"/eedata.mth: not found" |
|
|
fi |
|
|
else |
|
1165 |
extra_runs="$extra_runs $name" |
extra_runs="$extra_runs $name" |
1166 |
|
#else echo $dir"/"$exd"/eedata.mth: not found" |
1167 |
fi |
fi |
1168 |
|
else |
1169 |
|
extra_runs="$extra_runs $name" |
1170 |
fi |
fi |
1171 |
done |
fi |
1172 |
fi |
done |
1173 |
|
|
1174 |
echo "-------------------------------------------------------------------------------" |
echo "-------------------------------------------------------------------------------" |
1175 |
echo |
echo |
1198 |
&& symlink_mpifiles $dir $code_dir $builddir \ |
&& symlink_mpifiles $dir $code_dir $builddir \ |
1199 |
&& makedependmodel $dir/$builddir && makedepend=Y \ |
&& makedependmodel $dir/$builddir && makedepend=Y \ |
1200 |
&& makemodel $dir/$builddir && make=Y \ |
&& makemodel $dir/$builddir && make=Y \ |
1201 |
&& linkdata $dir/$rundir $input_dirs \ |
&& linkdata $dir/$rundir $inputdir input \ |
1202 |
&& runmodel $dir/$rundir && run=Y \ |
&& runmodel $dir/$rundir && run=Y \ |
1203 |
&& results=`testoutput_run $dir $rundir $ref_outp` |
&& results=`testoutput_run $dir $rundir $ref_outp` |
1204 |
fi |
fi |
1205 |
|
|
1206 |
echo |
echo |
|
# --> same processing for adjoint & forward test |
|
1207 |
fres=`formatresults $dir ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N} $results` |
fres=`formatresults $dir ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N} $results` |
1208 |
echo |
echo |
1209 |
echo "$fres" | sed 's/ 99/ --/g' | sed 's/ > />/' | sed 's/ < /</' >> $SUMMARY |
echo "$fres" | sed 's/ 99/ --/g' | sed 's/ > />/' | sed 's/ < /</' >> $SUMMARY |
1213 |
echo "UNAMEA='$UNAMEA'" >> $CDIR"/summary.txt" |
echo "UNAMEA='$UNAMEA'" >> $CDIR"/summary.txt" |
1214 |
echo "DATE='$DATE'" >> $CDIR"/summary.txt" |
echo "DATE='$DATE'" >> $CDIR"/summary.txt" |
1215 |
echo "tdir='$dir'" >> $CDIR"/summary.txt" |
echo "tdir='$dir'" >> $CDIR"/summary.txt" |
1216 |
|
if test "x$ADM" = xt ; then |
1217 |
|
head -1 $dir/$builddir/taf_ad.log >> $CDIR"/summary.txt" |
1218 |
|
grep -A3 'Seconds in section "ALL' $dir/$rundir/$OUTPUTFILE \ |
1219 |
|
>> $CDIR"/summary.txt" |
1220 |
|
fi |
1221 |
|
|
1222 |
for ex in $extra_runs ; do |
for ex in $extra_runs ; do |
1223 |
unset run |
unset run |
1230 |
CDIR=`pwd`"/$rel_CDIR" |
CDIR=`pwd`"/$rel_CDIR" |
1231 |
test ! -e "$dir/tr_run.$ex" && mkdir "$dir/tr_run.$ex" |
test ! -e "$dir/tr_run.$ex" && mkdir "$dir/tr_run.$ex" |
1232 |
run_clean $dir/tr_run.$ex |
run_clean $dir/tr_run.$ex |
1233 |
linkdata $dir/tr_run.$ex input.$ex input |
linkdata $dir/tr_run.$ex $inputdir.$ex $inputdir input |
1234 |
runmodel $dir/tr_run.$ex && run=Y \ |
runmodel $dir/tr_run.$ex && run=Y \ |
1235 |
&& results=`testoutput_run $dir tr_run.$ex $refExOut` |
&& results=`testoutput_run $dir tr_run.$ex $refExOut` |
1236 |
fres=`formatresults $dir ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N} $results` |
fres=`formatresults $dir ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N} $results` |
1243 |
echo "UNAMEA='$UNAMEA'" >> $CDIR"/summary.txt" |
echo "UNAMEA='$UNAMEA'" >> $CDIR"/summary.txt" |
1244 |
echo "DATE='$DATE'" >> $CDIR"/summary.txt" |
echo "DATE='$DATE'" >> $CDIR"/summary.txt" |
1245 |
echo "tdir='$dir.$ex'" >> $CDIR"/summary.txt" |
echo "tdir='$dir.$ex'" >> $CDIR"/summary.txt" |
1246 |
|
if test "x$ADM" = xt ; then |
1247 |
|
head -1 $dir/$builddir/taf_ad.log >> $CDIR"/summary.txt" |
1248 |
|
grep -A3 'Seconds in section "ALL' $dir/tr_run.$ex/$OUTPUTFILE \ |
1249 |
|
>> $CDIR"/summary.txt" |
1250 |
|
fi |
1251 |
if test "x$POSTCLEAN" = xt ; then |
if test "x$POSTCLEAN" = xt ; then |
1252 |
run_clean $dir/tr_run.$ex |
run_clean $dir/tr_run.$ex |
1253 |
fi |
fi |
1254 |
done |
done |
|
# <-- same processing for adjoint & forward test |
|
|
if test "x$ADM" = xt ; then |
|
|
head -1 $dir/$builddir/taf_ad.log >> $CDIR"/summary.txt" |
|
|
grep -A3 'Seconds in section "ALL' $dir/$rundir/$OUTPUTFILE \ |
|
|
>> $CDIR"/summary.txt" |
|
|
fi |
|
1255 |
|
|
1256 |
#postclean $dir/$builddir |
#postclean $dir/$builddir |
1257 |
if test "x$POSTCLEAN" = xt ; then |
if test "x$POSTCLEAN" = xt ; then |
1264 |
done |
done |
1265 |
|
|
1266 |
printf "Start time: " >> $SUMMARY |
printf "Start time: " >> $SUMMARY |
1267 |
echo $start_date >> $SUMMARY |
echo "$start_date" >> $SUMMARY |
1268 |
printf "End time: " >> $SUMMARY |
printf "End time: " >> $SUMMARY |
1269 |
date >> $SUMMARY |
date >> $SUMMARY |
1270 |
|
|