| 1 |
#! /usr/bin/env bash |
| 2 |
|
| 3 |
# $Header: /u/gcmpack/MITgcm_contrib/test_scripts/svante/test_submit_svante,v 1.25 2021/05/11 16:32:29 jmc Exp $ |
| 4 |
# $Name: $ |
| 5 |
|
| 6 |
today=`date +%Y%m%d` |
| 7 |
dInWeek=`date +%a` |
| 8 |
|
| 9 |
if test $# = 0 |
| 10 |
then |
| 11 |
TEST_LIST='ifcMpi ifcAdm pgiMpi pgiAdm pgiMth' |
| 12 |
else |
| 13 |
TEST_LIST=$* |
| 14 |
fi |
| 15 |
|
| 16 |
headNode=`hostname -s` |
| 17 |
#QSUB="qsub" |
| 18 |
#QLIST="qstat -u $USER" |
| 19 |
#dNam=$headNode |
| 20 |
QSUB="/usr/bin/sbatch" |
| 21 |
QLIST="/usr/bin/squeue -u $USER" |
| 22 |
dNam='svante' |
| 23 |
HERE="$HOME/test_${dNam}" |
| 24 |
TST_DISK="/net/fs09/d1/jm_c" |
| 25 |
TST_DIR="$TST_DISK/test_${dNam}" |
| 26 |
tmpFil="/tmp/"`basename $0`".$$" |
| 27 |
#- where local copy of code is (need to be consistent with run-job scripts): |
| 28 |
#srcDIR=$TST_DIR |
| 29 |
srcDIR=$HERE |
| 30 |
srcCode="MITgcm_today" |
| 31 |
|
| 32 |
logPfix='test_submit' |
| 33 |
SUB_DIR="$HERE/$dNam" |
| 34 |
OUT_DIR="$HERE/output" |
| 35 |
LOG_FIL="$OUT_DIR/$logPfix."`date +%m%d`".log" |
| 36 |
#SUB_DIR="$HERE/temp" |
| 37 |
|
| 38 |
#-- clean up old log files and start a new one: |
| 39 |
cd $OUT_DIR |
| 40 |
|
| 41 |
rm -f $logPfix.*.log_bak |
| 42 |
if test -f $LOG_FIL ; then mv -f $LOG_FIL ${LOG_FIL}_bak ; fi |
| 43 |
echo -n '-- Starting: ' | tee -a $LOG_FIL |
| 44 |
date | tee -a $LOG_FIL |
| 45 |
|
| 46 |
n=$(( `ls $logPfix.*.log | wc -l` - 10 )) |
| 47 |
if test $n -gt 0 ; then |
| 48 |
echo ' remove old log files:' | tee -a $LOG_FIL |
| 49 |
ls -lt $logPfix.*.log | tail -"$n" | tee -a $LOG_FIL |
| 50 |
ls -t $logPfix.*.log | tail -"$n" | xargs rm -f |
| 51 |
fi |
| 52 |
|
| 53 |
#------------------------------------------------------------- |
| 54 |
# defaults |
| 55 |
#export PATH="$PATH:/usr/local/bin" |
| 56 |
if [ -d ~/bin ]; then export PATH=$PATH:~/bin ; fi |
| 57 |
#- to get case insensitive "ls" (and order of tested experiments) |
| 58 |
export LC_ALL="en_US.UTF-8" |
| 59 |
# Turn off stack limit for FIZHI & AD-tests |
| 60 |
ulimit -s unlimited |
| 61 |
|
| 62 |
if test -f /etc/profile.d/modules.sh ; then . /etc/profile.d/modules.sh ; fi |
| 63 |
if test -f /etc/profile.d/zz_modules.sh ; then . /etc/profile.d/zz_modules.sh ; fi |
| 64 |
#- load standard modules: |
| 65 |
#module add fedora slurm maui svante |
| 66 |
module add slurm |
| 67 |
module list >> $LOG_FIL 2>&1 |
| 68 |
|
| 69 |
#- method to access CVS: |
| 70 |
cmdCVS='cvs -d :pserver:cvsanon@mitgcm.org:/u/gcmpack -q' |
| 71 |
#- which GitHub repository to use and how to access it: |
| 72 |
git_repo='MITgcm'; git_code='MITgcm' ; git_other='verification_other' |
| 73 |
#git_repo='altMITgcm'; #git_code='MITgcm66h' |
| 74 |
#-- |
| 75 |
git_repo="https://github.com/$git_repo" |
| 76 |
#git_repo="git://github.com/$git_repo" |
| 77 |
#git_repo="git@github.com:$git_repo" |
| 78 |
|
| 79 |
checkOut=1 |
| 80 |
addExp='' |
| 81 |
updFile='updated_code' |
| 82 |
|
| 83 |
#---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
| 84 |
if [ $checkOut -ge 1 ] ; then |
| 85 |
#-- Download/Update reference version of MITgcm code: |
| 86 |
|
| 87 |
if test $srcDIR = $TST_DIR ; then |
| 88 |
echo "cd $TST_DISK ; pwd (x2)" | tee -a $LOG_FIL |
| 89 |
cd $TST_DISK | tee -a $LOG_FIL 2>&1 |
| 90 |
pwd | tee -a $LOG_FIL |
| 91 |
fi |
| 92 |
if test ! -d $srcDIR ; then |
| 93 |
echo -n "Creating a working dir: $srcDIR ..." | tee -a $LOG_FIL |
| 94 |
#/bin/rm -rf $srcDIR |
| 95 |
mkdir $srcDIR |
| 96 |
retVal=$? |
| 97 |
if test "x$retVal" != x0 ; then |
| 98 |
echo "Error: unable to make dir: $srcDIR (err=$retVal ) --> Exit" | tee -a $LOG_FIL |
| 99 |
exit 1 |
| 100 |
fi |
| 101 |
fi |
| 102 |
cd $srcDIR |
| 103 |
pwd | tee -a $LOG_FIL |
| 104 |
|
| 105 |
#- remove date/lock-file and old copy: |
| 106 |
if test -f $updFile ; then rm -f $updFile ; sleep 2 ; fi |
| 107 |
test -e $srcCode && rm -rf $srcCode |
| 108 |
|
| 109 |
if [ $checkOut -eq 1 ] ; then |
| 110 |
if test ! -e $git_code/.git/config ; then |
| 111 |
echo "no file: $git_code/.git/config => try a new clone" | tee -a $LOG_FIL |
| 112 |
checkOut=2 |
| 113 |
fi |
| 114 |
if test ! -e $git_other/.git/config ; then |
| 115 |
echo "no file: $git_other/.git/config => try a new clone" | tee -a $LOG_FIL |
| 116 |
checkOut=2 |
| 117 |
fi |
| 118 |
fi |
| 119 |
if [ $checkOut -eq 2 ] ; then |
| 120 |
if test -e $git_code ; then |
| 121 |
echo -n " removing dir: $git_code ..." | tee -a $LOG_FIL |
| 122 |
rm -rf $git_code |
| 123 |
echo " done" | tee -a $LOG_FIL |
| 124 |
fi |
| 125 |
echo -n "Make a clone of $git_code from repo: $git_repo ..." | tee -a $LOG_FIL |
| 126 |
git clone $git_repo/${git_code}.git 2> $tmpFil |
| 127 |
retVal=$? |
| 128 |
if test $retVal = 0 ; then |
| 129 |
echo ' --> done!' | tee -a $LOG_FIL |
| 130 |
rm -f $tmpFil |
| 131 |
else echo '' | tee -a $LOG_FIL |
| 132 |
echo " Error: 'git clone' returned: $retVal" | tee -a $LOG_FIL |
| 133 |
cat $tmpFil ; rm -f $tmpFil |
| 134 |
exit 2 |
| 135 |
fi |
| 136 |
#-- |
| 137 |
if test -e $git_other ; then |
| 138 |
echo -n " removing dir: $git_other ..." | tee -a $LOG_FIL |
| 139 |
rm -rf $git_other |
| 140 |
echo " done" | tee -a $LOG_FIL |
| 141 |
fi |
| 142 |
echo -n "Make a clone of $git_other from repo: $git_repo ..." | tee -a $LOG_FIL |
| 143 |
git clone $git_repo/${git_other}.git 2> $tmpFil |
| 144 |
retVal=$? |
| 145 |
if test $retVal = 0 ; then |
| 146 |
echo ' --> done!' | tee -a $LOG_FIL |
| 147 |
rm -f $tmpFil |
| 148 |
else echo '' | tee -a $LOG_FIL |
| 149 |
echo " Error: 'git clone' returned: $retVal" | tee -a $LOG_FIL |
| 150 |
cat $tmpFil ; rm -f $tmpFil |
| 151 |
exit 2 |
| 152 |
fi |
| 153 |
fi |
| 154 |
#-- |
| 155 |
if [ $checkOut -eq 1 ] ; then |
| 156 |
echo -n "Updating current clone ( $git_code ) ..." | tee -a $LOG_FIL |
| 157 |
echo '' >> $LOG_FIL |
| 158 |
( cd $git_code ; git pull ) >> $LOG_FIL 2>&1 |
| 159 |
retVal=$? |
| 160 |
if test "x$retVal" != x0 ; then echo '' |
| 161 |
echo "'git pull' on '"`hostname`"' fail (return val=$retVal) => exit" | tee -a $LOG_FIL |
| 162 |
exit |
| 163 |
else echo " done" | tee -a $LOG_FIL |
| 164 |
fi |
| 165 |
echo " and checkout master:" | tee -a $LOG_FIL |
| 166 |
( cd $git_code ; git checkout master -- . ) | tee -a $LOG_FIL |
| 167 |
#--- |
| 168 |
echo -n "Updating current clone ( $git_other ) ..." | tee -a $LOG_FIL |
| 169 |
echo '' >> $LOG_FIL |
| 170 |
( cd $git_other ; git pull ) >> $LOG_FIL 2>&1 |
| 171 |
retVal=$? |
| 172 |
if test "x$retVal" != x0 ; then echo '' |
| 173 |
echo "'git pull' on '"`hostname`"' fail (return val=$retVal) => exit" | tee -a $LOG_FIL |
| 174 |
exit |
| 175 |
else echo " done" | tee -a $LOG_FIL |
| 176 |
fi |
| 177 |
echo " and checkout master:" | tee -a $LOG_FIL |
| 178 |
( cd $git_other ; git checkout master -- . ) | tee -a $LOG_FIL |
| 179 |
fi |
| 180 |
#---- making a new working copy: MITgcm_today |
| 181 |
rsync -a $git_code/ $srcCode --exclude '.git' |
| 182 |
ls -ld $srcCode | tee -a $LOG_FIL |
| 183 |
/usr/bin/find $srcCode -type d | xargs chmod g+rxs |
| 184 |
/usr/bin/find $srcCode -type f | xargs chmod g+r |
| 185 |
#- update date/lock-file: |
| 186 |
if test -d $srcCode/verification ; then |
| 187 |
echo $today > $updFile ; sleep 2 |
| 188 |
ls -l $updFile | tee -a $LOG_FIL |
| 189 |
echo '' | tee -a $LOG_FIL |
| 190 |
fi |
| 191 |
|
| 192 |
#-- Done with Download/Update of MITgcm code |
| 193 |
fi |
| 194 |
#---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
| 195 |
|
| 196 |
#-- leave srcDIR and go back to output dir |
| 197 |
cd $OUT_DIR |
| 198 |
#-- now really do something: |
| 199 |
|
| 200 |
JOB_LIST=$TEST_LIST |
| 201 |
NB_SUB_JOBS=0 |
| 202 |
for i in $JOB_LIST |
| 203 |
do |
| 204 |
sfx=`echo ${i} | sed 's/^.../&_/' | tr '[:upper:]' '[:lower:]'` |
| 205 |
BATCH_SCRIPT="test_${dNam}_$sfx" |
| 206 |
if test -f $SUB_DIR/$BATCH_SCRIPT ; then |
| 207 |
#- job name ( $JOB ) & output-file name ( $JOB.std??? ) must match |
| 208 |
# definition within $BATCH_SCRIPT slurm script |
| 209 |
JOB="${i}_tst" |
| 210 |
sJob=`printf "%8.8s" $JOB` #- squeue truncate name to only 1rst 8c |
| 211 |
#job_exist=`$QLIST | grep $JOB | wc -l` |
| 212 |
job_exist=`$QLIST | grep $sJob | wc -l` |
| 213 |
if test "x_$job_exist" = x_0 ; then |
| 214 |
#-- move previous output file |
| 215 |
outList=`ls $JOB.std??? 2> /dev/null` |
| 216 |
if test "x$outList" != x ; then |
| 217 |
echo -n " moving job $JOB old output files:" | tee -a $LOG_FIL |
| 218 |
if test -d $OUT_DIR/prev ; then |
| 219 |
for xx in $outList ; do |
| 220 |
pp=$OUT_DIR/prev/$xx ; echo -n " $xx" | tee -a $LOG_FIL |
| 221 |
test -f $pp.sav && mv -f $pp.sav $pp.old |
| 222 |
test -f $pp && mv -f $pp $pp.sav |
| 223 |
chmod a+r $xx ; mv -f $xx $OUT_DIR/prev |
| 224 |
done |
| 225 |
echo " to dir ./prev" | tee -a $LOG_FIL |
| 226 |
else |
| 227 |
echo " <-- missing dir $OUT_DIR/prev" | tee -a $LOG_FIL |
| 228 |
fi |
| 229 |
else echo " no old output files from job '$JOB'" | tee -a $LOG_FIL |
| 230 |
fi |
| 231 |
#-- submit job |
| 232 |
echo -n "--> $JOB : $BATCH_SCRIPT , " | tee -a $LOG_FIL |
| 233 |
$QSUB $SUB_DIR/$BATCH_SCRIPT | tee -a $LOG_FIL |
| 234 |
NB_SUB_JOBS=`expr $NB_SUB_JOBS + 1` |
| 235 |
sleep 1 |
| 236 |
else |
| 237 |
echo "--> $JOB :" | tee -a $LOG_FIL |
| 238 |
$QLIST | grep $sJob | tee -a $LOG_FIL |
| 239 |
echo ' job already exist => skip this test' | tee -a $LOG_FIL |
| 240 |
fi |
| 241 |
else |
| 242 |
echo 'no file:' $BATCH_SCRIPT 'to submit' | tee -a $LOG_FIL |
| 243 |
fi |
| 244 |
done |
| 245 |
#echo "info-sub-list: NB_SUB_JOBS='$NB_SUB_JOBS'" >> $LOG_FIL |
| 246 |
echo "Submitted $NB_SUB_JOBS jobs from dir: $SUB_DIR" | tee -a $LOG_FIL |
| 247 |
echo -n '-- Finished at: ' | tee -a $LOG_FIL |
| 248 |
date | tee -a $LOG_FIL |
| 249 |
|
| 250 |
#---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
| 251 |
exit 0 |
Parent Directory
| 
Revision Log
| 
Revision Graph