/[MITgcm]/mitgcm.org/scripts/check_outp
ViewVC logotype

Diff of /mitgcm.org/scripts/check_outp

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

revision 1.17 by jmc, Sun Jul 12 16:29:42 2009 UTC revision 1.21 by jmc, Mon Mar 22 14:45:20 2010 UTC
# Line 267  echo "     name     checked   comp    Di Line 267  echo "     name     checked   comp    Di
267  ( cd $INDIR ; ls -1 -t */summary.txt | sed 's/\/summary.txt//' ) > ./dir_all  ( cd $INDIR ; ls -1 -t */summary.txt | sed 's/\/summary.txt//' ) > ./dir_all
268    
269  if test "x$MACHINES" = "x_All_" ; then  if test "x$MACHINES" = "x_All_" ; then
270    MACHINES="faulks meander lagoon harbor dickens danton aces"    MACHINES="faulks meander lagoon aces dickens danton beagle harbor"
271    MACHINES="$MACHINES beagle columbia edvir rays solasrv sx8 xd1"    MACHINES="$MACHINES columbia pleiades iblade rays solssrv solasrv sx8"
272    MACHINES="$MACHINES bigred starp"    MACHINES="$MACHINES trane dodongo dokdo bigred"
273    
274    MALL=`cat ./dir_all | sed -e 's|_| |g' | awk '{print $2}' | sort | uniq`    MALL=`cat ./dir_all | sed -e 's|_| |g' | awk '{print $2}' | sort | uniq`
275    for madd in $MALL ; do    for madd in $MALL ; do
# Line 318  for mname in $MACHINES ; do Line 318  for mname in $MACHINES ; do
318              num=`grep -c "^$key" ./plist`              num=`grep -c "^$key" ./plist`
319            fi            fi
320            #- discard unsafe test:            #- discard unsafe test:
321            dd=`echo $optf | grep -c 'gfortran.*+mth'`            dd=`echo $optf | grep -c 'gfortran+mth'`
322            #if test $mname = 'lagoon' -a $dd = 1 ; then num=-1 ; fi            #if test $mname = 'lagoon' -a $dd = 1 ; then num=-1 ; fi
323            #if test $mname = 'harbor' -a $dd = 1 ; then num=-1 ; fi            #if test $mname = 'harbor' -a $dd = 1 ; then num=-1 ; fi
324            #if test $mname = 'aces' -a $optf = 'linux_ia32_open64' ; then num=-1 ; fi            #if test $mname = 'aces' -a $optf = 'linux_ia32_open64' ; then num=-1 ; fi
325            #if test $mname = 'aces' -a $optf = 'linux_ia32_g95' ; then num=-1 ; fi            #if test $mname = 'aces' -a $optf = 'linux_ia32_g95' ; then num=-1 ; fi
326            if test $num -gt 0 ; then            dd=`echo $optf | grep -c 'bigred.*+mth'`
327              #if test $mname = 'bigred' -a $dd = 1 ; then num=-1 ; fi
328              if test $num -lt 0 ; then
329                echo "  discard $sdir : $type , of='$optf'" | tee -a $OUTPFIL
330                cmis=`expr $cmis + 1`
331              elif test $num = '0' ; then
332                echo "no previous test for:" $key | tee -a $OUTPFIL
333                cmis=`expr $cmis + 1`
334              else
335              pline=`grep "^$key " ./plist | head -1`              pline=`grep "^$key " ./plist | head -1`
336              if test $dBug = 't' ; then              if test $dBug = 't' ; then
337                  echo "s='$sline'" | tee -a $OUTPFIL                  echo "s='$sline'" | tee -a $OUTPFIL
# Line 339  for mname in $MACHINES ; do Line 347  for mname in $MACHINES ; do
347                                   | sed 's/ OPTFILE=.*\// OPTFILE=/g' \                                   | sed 's/ OPTFILE=.*\// OPTFILE=/g' \
348                                   | grep -v '^[A-S][a-t]* time:  ' > tmpfp                                   | grep -v '^[A-S][a-t]* time:  ' > tmpfp
349              #-- re-order list of exp (according to local "sort" order)              #-- re-order list of exp (according to local "sort" order)
350              listD=`grep '^[YN] [YN] [YN] [YN]' tmpfs \              listD=`grep '^[YN] [YN] [YN] [YN]' tmpfs | awk '{print $NF}' | sort`
                  | sed 's/^[YN] .*pass //' | sed 's/^[YN] .*FAIL //' \  
                  | sed 's/^[YN] .*N\/O  //' | sort`  
351              for xx in $listD              for xx in $listD
352              do              do
353                  sed "/ $xx\$/d" tmpfs > tmpfn                  sed "/ $xx\$/d" tmpfs > tmpfn
354                  sed -n "/ $xx\$/p" tmpfs >> tmpfn                  sed -n "/ $xx\$/p" tmpfs >> tmpfn
355                  mv tmpfn tmpfs                  mv tmpfn tmpfs
356              done              done
357              listD=`grep '^[YN] [YN] [YN] [YN]' tmpfp \              listD=`grep '^[YN] [YN] [YN] [YN]' tmpfp | awk '{print $NF}' | sort`
                  | sed 's/^[YN] .*pass //' | sed 's/^[YN] .*FAIL //' \  
                  | sed 's/^[YN] .*N\/O  //' | sort`  
358              for xx in $listD              for xx in $listD
359              do              do
360                  sed "/ $xx\$/d" tmpfp > tmpfn                  sed "/ $xx\$/d" tmpfp > tmpfn
# Line 395  for mname in $MACHINES ; do Line 399  for mname in $MACHINES ; do
399                  cdif=`expr $cdif + 1`                  cdif=`expr $cdif + 1`
400                  echo '----------------------------------------' | tee -a $OUTPFIL                  echo '----------------------------------------' | tee -a $OUTPFIL
401              else              else
402                  echo "" | tee -a $OUTPFIL                  echo " $type , of='$optf'" | tee -a $OUTPFIL
403              fi              fi
404              rm -f tmpfs tmpfp tmpdf              rm -f tmpfs tmpfp tmpdf
           elif test $num = '0' ; then  
             echo "no previous test for:" $key | tee -a $OUTPFIL  
             cmis=`expr $cmis + 1`  
           else  
             cmis=`expr $cmis + 1`  
405            fi            fi
406          done          done
407          if [ $cmis -gt 0 ] ; then tmis='(-'$cmis')' ; else tmis='(--)' ; fi          if [ $cmis -gt 0 ] ; then tmis='(-'$cmis')' ; else tmis='(--)' ; fi
Legend:
Removed from v.1.17  
changed lines
  Added in v.1.21
  ViewVC Help
Powered by ViewVC 1.1.22