1 |
#! /usr/bin/env bash |
2 |
|
3 |
# $Header: /u/gcmpack/MITgcm_contrib/test_scripts/ref_machine/test_batsi,v 1.10 2019/12/07 16:22:32 jmc Exp $ |
4 |
|
5 |
# Test script for MITgcm that should work on most of the x86_64 Linux machines. |
6 |
|
7 |
tst_grp=0 ; if test $# = 1 ; then tst_grp=$1 ; fi |
8 |
if test $tst_grp != 'a' -a $tst_grp != 'b' ; then |
9 |
echo "missing or invalid argument (expect: 'a' or 'b') ==> exit" |
10 |
exit 1 |
11 |
fi |
12 |
|
13 |
#- defaults |
14 |
#export PATH="$PATH:/usr/local/bin" |
15 |
if [ -d ~/bin ]; then export PATH=$PATH:~/bin ; fi |
16 |
#- to get case insensitive "ls" (and order of tested experiments) |
17 |
export LC_ALL="en_US.UTF-8" |
18 |
# Turn off stack limit for FIZHI & AD-tests |
19 |
ulimit -s unlimited |
20 |
# MPI test (for now, only with gfortran) |
21 |
source $HOME/bin/openmpi.sh |
22 |
|
23 |
#- method to access CVS: |
24 |
cmdCVS='cvs -d :pserver:cvsanon@mitgcm.org:/u/gcmpack' |
25 |
# cmdCVS='cvs -d /u/gcmpack' |
26 |
# export CVS_RSH=ssh |
27 |
# cmdCVS='cvs -q -d :ext:jmc@mitgcm.org:/u/gcmpack' |
28 |
|
29 |
#- which GitHub repository to use and how to access it: |
30 |
git_repo='MITgcm'; git_code='MITgcm' ; git_other='verification_other' |
31 |
#git_repo='altMITgcm'; #git_code='MITgcm66h' |
32 |
#-- |
33 |
git_repo="https://github.com/$git_repo" |
34 |
#git_repo="git://github.com/$git_repo" |
35 |
#git_repo="git@github.com:$git_repo" |
36 |
|
37 |
#------------------------------------------------------------------- |
38 |
# checkOut=3 : clone from GitHub and make a new copy (if sepDir) |
39 |
# =2 : update (git pull) repo and make a new copy code (switch to 3 if no repo) |
40 |
# =1 : skip update but use a new copy (if sepDir) |
41 |
# =0 : use existing test code ( switch to 1 if missing test code ) |
42 |
dInWeek=`date +%a` |
43 |
|
44 |
dNam=`hostname -s | tr '[:upper:]' '[:lower:]'` |
45 |
TESTDIR="$HOME/test_${dNam}" |
46 |
#TESTDIR="/scratch/jmc/test_${dNam}" |
47 |
#MC=13 ; outDir="${dNam}-${tst_grp}" |
48 |
MC=11 ; outDir=$dNam |
49 |
sepDir=1 |
50 |
option= |
51 |
|
52 |
if test $tst_grp = 'a' ; then |
53 |
checkOut=2 |
54 |
#tst_list='g7a mpa mth mp2+rs mpi oad' |
55 |
tst_list='mpa adm g7a mpi mth+rs gfo+rs g77' |
56 |
#tst_list="$tst_list oad" |
57 |
else |
58 |
checkOut=1 |
59 |
tst_list='adm g77 gfo+rs ifc' |
60 |
if test "x$dInWeek" = xSun ; then tst_list="$tst_list tlm" ; fi |
61 |
fi |
62 |
echo " test: $outDir ; list='$tst_list'" |
63 |
|
64 |
#option="-nc" ; checkOut=0 |
65 |
#option="-q" ; checkOut=0 |
66 |
|
67 |
TODAY=`date +%d` |
68 |
tmpFil="/tmp/"`basename $0`".$$" |
69 |
tdir=$TESTDIR |
70 |
updFile='updated_code' ; today=`date +%Y%m%d` |
71 |
|
72 |
if [ $checkOut -le 1 ] ; then |
73 |
if test -e $tdir/MITgcm_today/doc ; then |
74 |
echo $tdir/MITgcm_today/doc 'exist' |
75 |
else |
76 |
echo -n $tdir/MITgcm_today 'missing ; ' |
77 |
checkOut=2 |
78 |
echo "will make a new copy ( checkOut=$checkOut )" |
79 |
fi |
80 |
fi |
81 |
|
82 |
if [ $checkOut -ge 2 ] ; then |
83 |
#---- cleaning: |
84 |
if test -e $tdir ; then |
85 |
#- remove date/lock-file: |
86 |
if test -f $tdir/$updFile ; then rm -f $tdir/$updFile ; sleep 2 ; fi |
87 |
echo -n "Removing working copy: $tdir/MITgcm_today ..." |
88 |
test -e $tdir/MITgcm_today && rm -rf $tdir/MITgcm_today |
89 |
else |
90 |
echo -n "Creating a working dir: $tdir ..." |
91 |
mkdir $tdir |
92 |
fi |
93 |
echo " done" |
94 |
cd $tdir |
95 |
|
96 |
#---- Making a new clone or updating existing one: |
97 |
if [ $checkOut -eq 2 ] ; then |
98 |
if test -e $git_code/.git/config ; then |
99 |
echo $git_code/.git/config 'exist' |
100 |
else |
101 |
echo -n $git_code/.git/config 'missing ; ' |
102 |
checkOut=3 |
103 |
echo "will get new clone ( checkOut=$checkOut )" |
104 |
fi |
105 |
if test -e $git_other/.git/config ; then |
106 |
echo $git_other/.git/config 'exist' |
107 |
else |
108 |
echo -n $git_other/.git/config 'missing ; ' |
109 |
checkOut=3 |
110 |
echo "will get new clone ( checkOut=$checkOut )" |
111 |
fi |
112 |
fi |
113 |
if [ $checkOut -eq 3 ] ; then |
114 |
test -e $git_code && rm -rf $git_code |
115 |
echo "Make a clone of $git_code from repo: $git_repo ..." |
116 |
git clone $git_repo/${git_code}.git 2> $tmpFil |
117 |
retVal=$? |
118 |
if test $retVal = 0 ; then |
119 |
echo ' --> done!' |
120 |
rm -f $tmpFil |
121 |
else |
122 |
echo " Error: 'git clone' returned: $retVal" |
123 |
cat $tmpFil |
124 |
rm -f $tmpFil |
125 |
exit 2 |
126 |
fi |
127 |
test -e $git_other && rm -rf $git_other |
128 |
echo "Make a clone of $git_other from repo: $git_repo ..." |
129 |
git clone $git_repo/${git_other}.git 2> $tmpFil |
130 |
retVal=$? |
131 |
if test $retVal = 0 ; then |
132 |
echo ' --> done!' |
133 |
rm -f $tmpFil |
134 |
else |
135 |
echo " Error: 'git clone' returned: $retVal" |
136 |
cat $tmpFil |
137 |
rm -f $tmpFil |
138 |
exit 2 |
139 |
fi |
140 |
else |
141 |
echo "Updating current clone ( $git_code ) ..." |
142 |
( cd $git_code ; git pull ) |
143 |
retVal=$? |
144 |
if test $retVal = 0 ; then |
145 |
echo ' --> done!' |
146 |
else |
147 |
echo "git pull on '"`hostname`"' fail (return val=$retVal) => exit" |
148 |
exit 3 |
149 |
fi |
150 |
( cd $git_code ; git checkout master -- . ) |
151 |
echo "Updating current clone ( $git_other ) ..." |
152 |
( cd $git_other ; git pull ) |
153 |
retVal=$? |
154 |
if test $retVal = 0 ; then |
155 |
echo ' --> done!' |
156 |
else |
157 |
echo "git pull on '"`hostname`"' fail (return val=$retVal) => exit" |
158 |
exit 3 |
159 |
fi |
160 |
( cd $git_other ; git checkout master -- . ) |
161 |
fi |
162 |
#---- making a new working copy: MITgcm_today |
163 |
rsync -a $git_code/ MITgcm_today --exclude '.git' |
164 |
if test $sepDir = 0 ; then |
165 |
echo -n " make a local copy of $git_other in MITgcm_today ..." | tee -a $tdir/output_$tt |
166 |
( cd MITgcm_today |
167 |
rsync -a ../$git_other/ $git_other --exclude '.git' ) |
168 |
echo " done" | tee -a $tdir/output_$tt |
169 |
fi |
170 |
#---- updating "other_input" dir |
171 |
if test -d other_input ; then |
172 |
list_dirs=`(cd other_input ; ls 2> /dev/null )` |
173 |
echo "Updating ( $cmdCVS update -P -d ) 'other_input' extra dirs:" |
174 |
for exd in $list_dirs ; do |
175 |
if test -d other_input/$exd/CVS ; then echo " $exd" |
176 |
( cd other_input/$exd ; $cmdCVS update -P -d ) |
177 |
fi |
178 |
done |
179 |
echo " <-- update of 'other_input' dirs done" |
180 |
fi |
181 |
#---- update date/lock-file: |
182 |
echo $today > $updFile ; sleep 2 ; ls -l $updFile |
183 |
else |
184 |
cd $tdir |
185 |
fi |
186 |
|
187 |
#------------------------------------------------------------------------ |
188 |
|
189 |
firstTst=`echo $tst_list | awk '{print $1}'` |
190 |
last_Tst=`echo $tst_list | awk '{print $NF}'` |
191 |
for tt in $tst_list |
192 |
do |
193 |
|
194 |
echo "================================================================" |
195 |
typ=`echo $tt | sed 's/+rs//'` |
196 |
#- define list of additional experiences to test: |
197 |
addExp='' |
198 |
if test $typ = 'mpi' ; then |
199 |
addExp="offline_cheapaml atm_gray atm_strato" |
200 |
fi |
201 |
if test $typ = 'gfo' -o $typ = 'ifc' ; then |
202 |
addExp="$addExp shelfice_remeshing" |
203 |
fi |
204 |
if test $typ = 'mpi' ; then |
205 |
addExp="$addExp global_ocean.gm_k3d" |
206 |
addExp="$addExp global_ocean.gm_res" |
207 |
addExp="$addExp global_oce_cs32" |
208 |
fi |
209 |
#- check day and time: |
210 |
curDay=`date +%d` ; curHour=`date +%H` |
211 |
if [ $curDay -ne $TODAY ] ; then |
212 |
date ; echo "day is over => skip test $typ" |
213 |
continue |
214 |
fi |
215 |
if [ $curHour -ge 18 ] ; then |
216 |
date ; echo "too late to run test $typ" |
217 |
continue |
218 |
fi |
219 |
if test $sepDir = 0 -a "x$option" != x -a $tt != $last_Tst ; then |
220 |
echo "using option='$option' prevent multi-tests => skip test $typ" |
221 |
continue |
222 |
fi |
223 |
#- clean-up old output files |
224 |
if test -d $tdir/prev ; then |
225 |
mv -f $tdir/output_${typ}* $tdir/prev |
226 |
else |
227 |
rm -f $tdir/output_${typ}* |
228 |
fi |
229 |
touch $tdir/output_$tt |
230 |
echo -n "-- Starting test: $tt at: " >> $tdir/output_$tt |
231 |
date >> $tdir/output_$tt |
232 |
echo " typ='$typ', addExp='$addExp'" >> $tdir/output_$tt |
233 |
if test $sepDir = 1 ; then |
234 |
new_dir="MITgcm_$typ" |
235 |
reUse=0 ; if [ $checkOut -le 0 ] ; then reUse=1 ; fi |
236 |
if test -d $new_dir/doc -a $reUse = 1 ; then |
237 |
cd $tdir/$new_dir |
238 |
if test $tt != $typ ; then |
239 |
( cd verification ; ../tools/do_tst_2+2 -clean ) |
240 |
fi |
241 |
else |
242 |
if test -d prev ; then |
243 |
#-- save previous summary: |
244 |
oldS=`ls -t ${new_dir}/verification/tr_${outDir}_*/summary.txt 2> /dev/null | head -1` |
245 |
if test "x$oldS" != x ; then |
246 |
cat $oldS | sed '/^[YN] [YN] [YN] [YN]/ s/ \. //g' > prev/tr_out.$typ |
247 |
touch -r $oldS prev/tr_out.$typ |
248 |
fi |
249 |
if test $tt != $typ ; then |
250 |
oldS=`ls -t ${new_dir}/verification/rs_${outDir}_*/summary.txt 2> /dev/null | head -1` |
251 |
if test "x$oldS" != x ; then cp -p -f $oldS prev/rs_out.$typ ; fi |
252 |
fi |
253 |
fi |
254 |
echo " remove dir: $new_dir and make new one" >> $tdir/output_$tt |
255 |
test -e $new_dir && rm -rf $new_dir |
256 |
mkdir $new_dir |
257 |
#- before making a copy, check that code has been updated |
258 |
nCount=0; today=`date +%Y%m%d` |
259 |
updDate=0 ; test -f $updFile && updDate=`cat $updFile` |
260 |
while [ $today -gt $updDate ] ; do |
261 |
nCount=`expr $nCount + 1` |
262 |
if [ $nCount -gt 40 ] ; then |
263 |
echo " waiting too long (nCount=$nCount) for updated code" |
264 |
echo " today=$today , updDate=$updDate " |
265 |
ls -l $updFile |
266 |
exit |
267 |
fi |
268 |
sleep 60 |
269 |
updDate=0 ; test -f $updFile && updDate=`cat $updFile` |
270 |
done |
271 |
ls -l $updFile | tee -a $tdir/output_$tt |
272 |
echo " waited nCount=$nCount for updated code ($updDate) to copy" | tee -a $tdir/output_$tt |
273 |
#----------------------------- |
274 |
if test -d MITgcm_today -a -d $new_dir ; then |
275 |
echo " copy main code from MITgcm_today to $new_dir" | tee -a $tdir/output_$tt |
276 |
cp -ra MITgcm_today/* $new_dir 2>&1 | tee -a $tdir/output_$tt |
277 |
else |
278 |
if test -d MITgcm_today ; then |
279 |
echo " missing dir $new_dir --> end test $tt" | tee -a $tdir/output_$tt |
280 |
else |
281 |
echo " missing dir MITgcm_today --> end test $tt" | tee -a $tdir/output_$tt |
282 |
fi |
283 |
continue |
284 |
fi |
285 |
echo -n " cd $tdir/$new_dir " | tee -a $tdir/output_$tt |
286 |
cd $tdir/$new_dir |
287 |
retVal=$? |
288 |
( echo "(retVal= $retVal )" ; pwd ) | tee -a $tdir/output_$tt |
289 |
if test -d verification ; then |
290 |
echo " check: dir verification exist" | tee -a $tdir/output_$tt |
291 |
else |
292 |
echo " missing dir verification --> end test $tt" | tee -a $tdir/output_$tt |
293 |
continue |
294 |
fi |
295 |
if test "x$addExp" != x ; then |
296 |
echo -n " make a local copy of $git_other ..." | tee -a $tdir/output_$tt |
297 |
rsync -a $tdir/$git_other/ $git_other --exclude '.git' |
298 |
echo " done" | tee -a $tdir/output_$tt |
299 |
fi |
300 |
#-- add additional experience from $git_other |
301 |
for exp2add in $addExp ; do |
302 |
echo " add link: $exp2add (from $git_other )" | tee -a $tdir/output_$tt |
303 |
( cd verification ; ln -s ../$git_other/$exp2add . ) |
304 |
if test $exp2add = 'global_oce_cs32' ; then |
305 |
echo " link dir 'other_input/core2_cnyf' in here" | tee -a $tdir/output_$tt |
306 |
( cd ${git_other}/${exp2add} |
307 |
ln -s ../../../other_input/core2_cnyf . ) |
308 |
fi |
309 |
#if test $exp2add = 'shelfice_remeshing' ; then |
310 |
# echo " link dir 'other_input/remeshing_code' to 'extra_code'" | tee -a $tdir/output_$tt |
311 |
# ( cd verification/${exp2add} |
312 |
# ln -s ../../../other_input/remeshing_code extra_code ) |
313 |
#fi |
314 |
done |
315 |
fi |
316 |
else |
317 |
cd $tdir/MITgcm_today |
318 |
fi |
319 |
cd verification |
320 |
|
321 |
#-- set the testreport command: |
322 |
comm="./testreport" |
323 |
if test $typ = 'g7a' -o $typ = 'adm' -o $typ = 'mpa' ; then |
324 |
comm="$comm -adm" |
325 |
elif test $typ = 'oad' ; then |
326 |
comm="$comm -oad" |
327 |
elif test $typ = 'tlm' ; then |
328 |
comm="$comm -tlm" |
329 |
elif test $typ = 'mth' -o $typ = 'mp2' ; then |
330 |
export GOMP_STACKSIZE=400m |
331 |
export OMP_NUM_THREADS=2 |
332 |
comm="$comm -mth" |
333 |
else |
334 |
comm="$comm -md cyrus-makedepend" |
335 |
fi |
336 |
comm="$comm -odir $outDir -a jm_c@mitgcm.org" |
337 |
#-- set the optfile (+ mpi & match-precision) |
338 |
MPI=0 |
339 |
case $typ in |
340 |
'g77'|'g7a') OPTFILE='../tools/build_options/linux_amd64_g77' ;; |
341 |
'gfo'|'adm'|'oad'|'tlm'|'mth') comm="$comm -match $MC -devel" |
342 |
OPTFILE='../tools/build_options/linux_amd64_gfortran' ;; |
343 |
'ifc') comm="$comm -devel" |
344 |
OPTFILE='../tools/build_options/linux_amd64_ifort11' ;; |
345 |
'pgi') OPTFILE='../tools/build_options/linux_amd64_pgf77' ;; |
346 |
'mpa'|'mpi'|'mp2') comm="$comm -match $MC -devel" ; MPI=8 |
347 |
OPTFILE='../tools/build_options/linux_amd64_gfortran' ;; |
348 |
*) OPTFILE= ;; |
349 |
esac |
350 |
#-- set MPI command: |
351 |
if test $MPI != 0 ; then |
352 |
if test $typ = 'mp2' ; then MPI=3 ; fi |
353 |
if test $typ = 'mpa' ; then |
354 |
EXE="mpirun -np TR_NPROC ./mitgcmuv_ad" |
355 |
else |
356 |
EXE="mpirun -np TR_NPROC ./mitgcmuv" |
357 |
fi |
358 |
fi |
359 |
if test $typ = 'g7a' ; then |
360 |
#- pkg/ecco does not compile with g77 + no NetCDF here => no pkg/profiles |
361 |
comm="$comm -skd global_oce_biogeo_bling" |
362 |
fi |
363 |
|
364 |
#-- set specific Env Vars: |
365 |
if test $typ = 'oad' ; then |
366 |
#- for some reasons, "source ScriptFile | tee -a LogFile" |
367 |
# does run the script but does not keep the env-var settings |
368 |
source $HOME/mitgcm/bin/setenv_OpenAD.sh >> $tdir/output_$tt |
369 |
fi |
370 |
if test $typ = 'ifc' ; then |
371 |
source /srv/software/intel/intel-11.1.073/bin/ifortvars.sh intel64 |
372 |
fi |
373 |
if test $typ = 'pgi' ; then |
374 |
#listT='fizhi-cs-32x32x40 fizhi-cs-aqualev20' |
375 |
export PGI=/srv/software/pgi/pgi-10.9 |
376 |
export PATH="$PATH:$PGI/linux86-64/10.9/bin" |
377 |
export LM_LICENSE_FILE=$PGI/license.dat |
378 |
fi |
379 |
|
380 |
if test $sepDir = 0 -a "x$option" = x -a $tt = $firstTst -a $checkOut = 0 ; then |
381 |
#-- cleaning: |
382 |
echo "======================" |
383 |
echo "Cleaning test directories:" | tee -a $tdir/output_$tt |
384 |
cmdCLN="./testreport -clean" |
385 |
echo " clean dir running: $cmdCLN" | tee -a $tdir/output_$tt |
386 |
$cmdCLN >> $tdir/output_$tt 2>&1 |
387 |
echo "======================" |
388 |
echo "" | tee -a $tdir/output_$tt |
389 |
fi |
390 |
|
391 |
#-- run the testreport command: |
392 |
echo -n "Running testreport using:" | tee -a $tdir/output_$tt |
393 |
if test "x$OPTFILE" != x ; then |
394 |
comm="$comm -of=$OPTFILE" |
395 |
fi |
396 |
if test $MPI = 0 ; then echo '' | tee -a $tdir/output_$tt |
397 |
else echo " (EXE='$EXE')" | tee -a $tdir/output_$tt |
398 |
comm="$comm -MPI $MPI -command \"\$EXE\"" |
399 |
fi |
400 |
if test "x$option" != x ; then comm="$comm $option" ; fi |
401 |
#if test $typ = 'pgi' ; then comm="$comm -t \"\$listT\"" ; fi |
402 |
echo " \"eval $comm\"" | tee -a $tdir/output_$tt |
403 |
echo "======================" |
404 |
eval $comm >> $tdir/output_$tt 2>&1 |
405 |
sed -n "/^An email /,/^======== End of testreport / p" $tdir/output_$tt |
406 |
echo "" | tee -a $tdir/output_$tt |
407 |
|
408 |
#-- also test restart (test 2+2=4) |
409 |
if test $tt != $typ |
410 |
then |
411 |
echo "testing restart using:" | tee -a $tdir/output_$tt |
412 |
comm="../tools/do_tst_2+2 -o $outDir -a jm_c@mitgcm.org" |
413 |
if test $MPI = 0 ; then |
414 |
echo " \"$comm\"" | tee -a $tdir/output_$tt |
415 |
echo "======================" |
416 |
$comm >> $tdir/output_$tt 2>&1 |
417 |
else |
418 |
echo " \"$comm -mpi -exe $EXE\"" | tee -a $tdir/output_$tt |
419 |
echo "======================" |
420 |
$comm -mpi -exe "$EXE" >> $tdir/output_$tt 2>&1 |
421 |
fi |
422 |
echo ; cat tst_2+2_out.txt |
423 |
echo |
424 |
fi |
425 |
export OMP_NUM_THREADS=1 |
426 |
|
427 |
if test $sepDir = 0 ; then |
428 |
#-- cleaning: |
429 |
echo "======================" |
430 |
echo "Cleaning test directories:" | tee -a $tdir/output_$tt |
431 |
if test $tt != $typ ; then |
432 |
cmdCLN="../tools/do_tst_2+2 -clean" |
433 |
echo " clean tst_2+2 running: $cmdCLN" | tee -a $tdir/output_$tt |
434 |
$cmdCLN >> $tdir/output_$tt 2>&1 |
435 |
fi |
436 |
if test $tt != $last_Tst ; then |
437 |
cmdCLN="./testreport -clean" |
438 |
echo " clean dir running: $cmdCLN" | tee -a $tdir/output_$tt |
439 |
$cmdCLN >> $tdir/output_$tt 2>&1 |
440 |
fi |
441 |
echo "======================" |
442 |
echo |
443 |
fi |
444 |
cd $tdir |
445 |
|
446 |
done |