mitgcm.org/front_content/make_summary

#! /usr/bin/env bash

# $Header: /u/u3/gcmpack/mitgcm.org/front_content/make_summary,v 1.7 2003/12/10 20:37:24 edhill Exp $
#
#  The purpose of this script is to create HTML summaries of the
#  directories produced by the "parse_emails" script.


usage()
{
    echo
    echo "Usage:  $0 [OPTIONS]"
    echo 
    echo "where possible OPTIONS are:"
    echo "  (-help|-h)           print usage"
    echo "  (-date |-d )PERIOD   run for PERIOD=\"YYYY_MM\""
    echo "                         [def=\"$PERIOD\"]"
    echo 
    exit 1
}

old_summary()
{
    #  Create the old-style summary file for $PERIOD
    echo -n "Creating the summary file for the period \"$PERIOD\" ...  "
    cat > $OUTFILE << EOF
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
  <head>
    <title>MITgcm testing summary</title>
    <meta name="author" content="Ed Hill" />
    <base href="http://mitgcm.org/testing/summary/" />
  </head>
  <body>
    <table cellpadding="0" cellspacing="0" border="0" width="100%">

EOF

    # all_files=`find $INDIR -name summary.txt`
    all_files=`( cd $INDIR ; find . -name summary.txt )`

    for f in $all_files ; do
	
	file=$INDIR"/"${f/.\//}
	grep "^fresults" $file > /dev/null 2>&1
	RETVAL=$?
	if test "x$RETVAL" != x0 ; then
	    continue
	fi
	
	url=`echo $file | sed -e 's|/u/edhill/www|http://mitgcm.org/~edhill|'`
	url=`echo $url | sed -e 's|summary.txt||'`
	MACH=
	fresults=
	color="#eeeeee"
	
	source $file
	echo $fresults | grep FAIL > /dev/null 2>&1
	if test "x$?" = x0 ; then
	    color="#ff99ff"
	fi
	echo $fresults | grep pass > /dev/null 2>&1
	if test "x$?" = x0 ; then
	    color="#99ffff"
	fi
	
	gm_state=`echo $file | sed -e 's/summary.txt/genmake_state/g'`
	if test -r $gm_state ; then
	    grep '^OPTFILE=' $gm_state > ./tmp_state
	    source ./tmp_state
	else
	    optfile="unknown"
	fi
	optfile=`echo $OPTFILE | awk -F '/' '{print $NF}'`
	
	echo "<tr bgcolor=\"$color\">" >> $OUTFILE
	echo "<td height=\"0\">$MACH</td>" >> $OUTFILE
	echo "<td><a href=\"$url\">$DATE</a></td>" >> $OUTFILE
	for i in $fresults ; do
	    if test "x$i" = xN ; then
		echo -n "<td bgcolor=\"#ff6666\">$i</td>" >> $OUTFILE
	    else
		echo -n "<td>$i</td>" >> $OUTFILE
	    fi
	done
	echo "<td>$optfile</td>" >> $OUTFILE
	echo "</tr>" >> $OUTFILE
	
    done
    
    cat >> $OUTFILE << EOF

    </table>
  </body>
</html>
EOF

    chmod a+r $OUTFILE
    echo "done"
}


# defaults
PERIOD=`date +%Y`"_"`date +%m`

#  Parse options
ac_prev=
for ac_option ; do
        
    # If the previous option needs an argument, assign it.
    if test -n "$ac_prev"; then
        eval "$ac_prev=\$ac_option"
        ac_prev=
        continue
    fi
    
    ac_optarg=`expr "x$ac_option" : 'x[^=]*=\(.*\)'`
    
    case $ac_option in
	
	-help | --help | -h | --h)
	    usage ;;
	
        -date | --date | -d | --d)
            ac_prev=PERIOD ;;
        --date=* | -date=*)
            PERIOD=$ac_optarg ;;
        
        *)
	    echo "Error: don't understand argument \"$ac_option\""
	    usage
            ;;
        
     esac
     
done

INDIR="/u/u0/httpd/html/testing/results/$PERIOD"
OUTDIR="/u/u0/httpd/html/testing/summary"
OUTFILE=$OUTDIR"/summary_"$PERIOD".html"

#  Create the "latest" links
echo "Creating the \"latest\" file for each machine: "
LATEST=$OUTDIR"/latest_"$PERIOD".html"
the_date=`date`
cat > $LATEST << EOF
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
  <head>
    <title>MITgcm testing summary</title>
    <meta name="author" content="Ed Hill" />

    <!-- <base href="http://mitgcm.org/testing/summary/" /> -->

    <!-- Hinting for menu generation -->
    <meta name="add_name_0" content="Testing" />
    <meta name="add_name_1" content="" />
    <meta name="add_name_2" content="" />
    <meta name="add_title" content="Testing" />
    <!-- Hinting for menu generation -->

  </head>
  <body>
    <p>The MITgcm model is tested 
      (compiled and run) in an automated fashion on a varirety of 
      different machines.  The following is a summary of the MITgcm 
      verification suite for the time period: <b>$PERIOD</b>.</p>

    <p>The machine naming scheme is:<br /></p>
    <table align="center" cellpadding="0" border="0">
      <tr bgcolor="#00cccc"> <td><b>Machine Type</b></td> <td><b>Nickname</b></td>
        <td><b>Notes</b></td> </tr>

      <tr bgcolor="#bbffdd"> <td>Intel P4</td> <td>"faulks"</td> 
        <td>Red Hat 7.3 (the "original" testing machine)</td> </tr>
      <tr bgcolor="#bbddff"> <td>Intel P4</td> <td>"shelley"</td>
        <td>Red Hat 9</td> </tr>

      <tr bgcolor="#bbffdd"> <td> Intel P3/P4 Beowulf </td> <td>"myrinet"</td>
        <td><a href="http://mitgcm.org/projects/MITGCM_CLUSTER/">MITgcm cluster 
        facility </a></td> </tr>
      <tr bgcolor="#bbddff"> <td>Alpha cluster</td> <td>"halem"</td>
        <td><a href="http://webserv.gsfc.nasa.gov/SCB/NCCS/systems/high-end-computing.html">
        NASA NCCS Halem</a></td> </tr>

      <tr bgcolor="#bbffdd"> <td> SGI Origin 2000 </td> <td>"hopper"</td>
        <td><a href="http://www.nas.nasa.gov/User/Systemsdocs/O2K/o2k.html">
        NAS SGI Origin 2000 </a></td> </tr>
      <tr bgcolor="#bbddff"> <td> SGI Origin 3000 </td> <td>"lomax"</td>
        <td><a href="http://www.nas.nasa.gov/User/Systemsdocs/O3K/o3k.html">
        NAS SGI Origin 3000 </a></td> </tr>

      <tr bgcolor="#bbffdd"> <td> SGI Altix </td> <td>"orion"</td>
        <td><a href="http://sc.jpl.nasa.gov/">JPL Supercomputing and 
        Visualization Facility</a></td> </tr>
      <tr bgcolor="#bbddff"> <td> IBM POWER3 SP </td> <td>"bf"</td>
        <td><a href="http://www.scd.ucar.edu/computers/blackforest/">NCAR Blackforest
        </a></td> </tr>

      <tr bgcolor="#bbffdd"> <td> IBM POWER4 SP </td> <td>"bs"</td>
        <td><a href="http://www.scd.ucar.edu/computers/bluesky/">NCAR Bluesky
        </a></td> </tr>
      <tr bgcolor="#bbddff"> <td> AMD Opteron </td> <td>"eaps"</td>
        <td>SuSE Linux 9.0 (x86-64)</td> </tr>

      <tr bgcolor="#bbffdd"> <td> Sun UltraSparc </td> <td>"slough"</td>
        <td>Solaris 8</td> </tr>
      <tr bgcolor="#bbddff"> <td> Intel P4 Mosix Cluster </td> <td>"sea"</td>
        <td>Red Hat v7.2</td> </tr>

      <!--
      <tr bgcolor="#bbddff"> <td>  </td> <td>""</td>
        <td></td> </tr>
      -->

    </table>

    <p><br />
      The complete output for the verification runs can be found in
      <a href="http://mitgcm.org/testing/summary/">the summary pages</a>
      and the <a href="http://mitgcm.org/testing/results/">testing archives</a>. 
      The latest reports are:</p>
    <table align="center" cellpadding="0" cellspacing="0" border="0" width="95%">
<tr bgcolor="#00cccc">
  <td height="0"> <b>Nickname</b> </td>
  <td> <b>OPTFILE Name</b> </td>
  <td> <b>Type</b> </td>
  <td> <b>Date</b> </td>
  <td> <b>Summary</b> </td>
  <td> <b>Ratio</b> </td>
</tr>

EOF

color="#bbffdd"
res_url="http://mitgcm.org/testing/"

MACHINES="faulks shelley myrinet eaps halem hopper lomax orion bf bs slough sea"

( cd $INDIR ; ls -1 ) > ./dir_all

for mname in $MACHINES ; do

    echo "  $mname"
    if test "x$color" = x#bbffdd ; then
	color="#bbddff"
    else
	color="#bbffdd"
    fi

    dir_list=`grep $mname ./dir_all`
    echo -n "" > ./mlist

    for i in $dir_list ; do

	dir=$INDIR"/"$i
	OPTFILE=
	if test -r $dir/summary.txt ; then
	    comm=`grep 'OPTFILE=' $dir/summary.txt`
	    eval $comm
	    OPTFILE=${OPTFILE##*/}
	fi
	if test "x$OPTFILE" = x -a -r "$dir/genmake_state" ; then
	    comm=`grep 'OPTFILE=' $dir/genmake_state 2>/dev/null`
	    eval $comm
	    OPTFILE=${OPTFILE##*/}
	fi
	if test "x$OPTFILE" = x ; then
	    comm=`grep '^# OPTFILE=' $dir/*/Makefile 2>/dev/null | head -1`
	    comm=${comm##*#}
	    eval $comm
	    OPTFILE=${OPTFILE##*/}
	fi
	if test "x$OPTFILE" = x ; then
	    OPTFILE="not_explicitly_specified"
	fi

	ADJOINT=
	if test -r $dir/summary.txt ; then
	    comm=`grep 'ADJOINT=true' $dir/summary.txt 2>/dev/null`
	    eval $comm
	fi
	if test "x$ADJOINT" = x ; then
	    kind="forward"
	else
	    test "x$ADJOINT" = xtrue  &&  kind="adjoint"
	fi

	t_pass="--"
	t_tot="--"
	if test -r $dir/summary.txt ; then
	    grep '^[YN] [YN] [YN] [YN] ' $dir/summary.txt > ./all_tests 2>/dev/null
	    t_tot=`cat ./all_tests | wc -l | sed -e 's| ||g'`
	    grep '^Y Y Y Y ' ./all_tests > ./all_ran 2>/dev/null
	    grep advect_ ./all_ran 2>/dev/null > ./all_ran_advect
	    t_advect=`cat ./all_ran_advect | wc -l | sed -e 's| ||g'`
	    digits=`cat ./all_ran_advect | awk '{print $9}'`
	    t_advect_pass=0
	    for k in $digits ; do
		test "x$k" = x--   &&  k=0
		test $k -ge 9  &&  t_advect_pass=$(( $t_advect_pass + 1 ))
	    done
	    grep -v advect ./all_ran 2>/dev/null > ./all_ran_noadvect
	    digits=`cat ./all_ran_noadvect | awk '{print $5}'`
	    t_sum=0
	    for k in $digits ; do
		test "x$k" = x--   &&  k=0
		test $k -ge 9  &&  t_sum=$(( $t_sum + 1 ))
	    done
	    t_pass=$(( $t_sum + $t_advect_pass ))
	fi
	rm -f ./all_tests ./all_ran ./all_ran_advect ./all_ran_noadvect
	# echo "${dir##*/} : $t_pass out of $t_tot"

	tokens=`echo $i | sed -e 's|_| |g'`
	echo "" > ./ms_tmp
	for tok in $tokens ; do
	    echo $tok >> ./ms_tmp
	done
	DAY=`cat ./ms_tmp | awk '(length($1)==8 && substr($1,0,3)=="200")'`
	rm -f ./ms_tmp

	echo "$OPTFILE$kind $DAY $OPTFILE $kind $i $t_pass:$t_tot" >> ./mlist

    done

    # helpful for debugging
    # cat ./mlist

    #  Do we have any data?  If so, create the latest pointer.
    num=`wc -l ./mlist | awk '{print $1}'`
    if test $num -gt 0 ; then
	keys=`cat ./mlist | cut -d " " -f 1 | sort | uniq`

	for key in $keys ; do
	    tline=`grep "^$key " ./mlist | sort -r | head -1`
	    ratio=`echo $tline | cut -d " " -f 6`
	    ldir=`echo $tline | cut -d " " -f 5`
	    kind=`echo $tline | cut -d " " -f 4`
	    optf=`echo $tline | cut -d " " -f 3`
	    DAY=`echo $tline | cut -d " " -f 2`
	    URL="results/$PERIOD/$ldir"
	    cat <<EOF >>$LATEST
<tr bgcolor="$color">
  <td height="0"> $mname </td>
  <td> $optf </td>
  <td> $kind </td>
  <td> <a href="$res_url$URL">$DAY</a> </td>
  <td> <a href="$res_url$URL/summary.txt"> summary.txt </a> </td>
  <td> $ratio </td>
</tr>
EOF
	done
    fi

done

cat >> $LATEST << EOF
<tr bgcolor="#00cccc">
  <td height="0" colspan="6" align="center" >This table generated on: $the_date</td>
</tr>

    </table>

<p>Examples of the scripts used for these testing runs can be obtained
from <a
href="http://dev.mitgcm.org/cgi-bin/viewcvs.cgi/MITgcm_contrib/test_scripts/">
the "contrib" area of the MITgcm CVS archive</a>.</p>


  </body>
</html>

EOF

rm -f ./dir_all ./mlist

CURR_PER=`date +%Y`"_"`date +%m`
if test "x$PERIOD" = "x$CURR_PER" ; then
    cp $LATEST ./testing.xml
    (
	cd $OUTDIR
	rm -f latest.html
	ln -s $LATEST latest.html
    )
fi
1	edhill	1.1	#! /usr/bin/env bash
2
3	edhill	1.8	# $Header: /u/u3/gcmpack/mitgcm.org/front_content/make_summary,v 1.7 2003/12/10 20:37:24 edhill Exp $
4	edhill	1.1	#
5			# The purpose of this script is to create HTML summaries of the
6			# directories produced by the "parse_emails" script.
7
8
9			usage()
10			{
11			echo
12			echo "Usage: $0 [OPTIONS]"
13			echo
14			echo "where possible OPTIONS are:"
15			echo " (-help\|-h) print usage"
16			echo " (-date \|-d )PERIOD run for PERIOD=\"YYYY_MM\""
17			echo " [def=\"$PERIOD\"]"
18			echo
19			exit 1
20			}
21
22	edhill	1.6	old_summary()
23			{
24			# Create the old-style summary file for $PERIOD
25			echo -n "Creating the summary file for the period \"$PERIOD\" ... "
26			cat > $OUTFILE << EOF
27			<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
28			"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
29
30			<html xmlns="http://www.w3.org/1999/xhtml">
31			<head>
32			<title>MITgcm testing summary</title>
33			<meta name="author" content="Ed Hill" />
34			<base href="http://mitgcm.org/testing/summary/" />
35			</head>
36			<body>
37			<table cellpadding="0" cellspacing="0" border="0" width="100%">
38
39			EOF
40
41			# all_files=`find $INDIR -name summary.txt`
42			all_files=`( cd $INDIR ; find . -name summary.txt )`
43
44			for f in $all_files ; do
45
46			file=$INDIR"/"${f/.\//}
47			grep "^fresults" $file > /dev/null 2>&1
48			RETVAL=$?
49			if test "x$RETVAL" != x0 ; then
50			continue
51			fi
52
53			url=`echo $file \| sed -e 's\|/u/edhill/www\|http://mitgcm.org/~edhill\|'`
54			url=`echo $url \| sed -e 's\|summary.txt\|\|'`
55			MACH=
56			fresults=
57			color="#eeeeee"
58
59			source $file
60			echo $fresults \| grep FAIL > /dev/null 2>&1
61			if test "x$?" = x0 ; then
62			color="#ff99ff"
63			fi
64			echo $fresults \| grep pass > /dev/null 2>&1
65			if test "x$?" = x0 ; then
66			color="#99ffff"
67			fi
68
69			gm_state=`echo $file \| sed -e 's/summary.txt/genmake_state/g'`
70			if test -r $gm_state ; then
71			grep '^OPTFILE=' $gm_state > ./tmp_state
72			source ./tmp_state
73			else
74			optfile="unknown"
75			fi
76			optfile=`echo $OPTFILE \| awk -F '/' '{print $NF}'`
77
78			echo "<tr bgcolor=\"$color\">" >> $OUTFILE
79			echo "<td height=\"0\">$MACH</td>" >> $OUTFILE
80			echo "<td><a href=\"$url\">$DATE</a></td>" >> $OUTFILE
81			for i in $fresults ; do
82			if test "x$i" = xN ; then
83			echo -n "<td bgcolor=\"#ff6666\">$i</td>" >> $OUTFILE
84			else
85			echo -n "<td>$i</td>" >> $OUTFILE
86			fi
87			done
88			echo "<td>$optfile</td>" >> $OUTFILE
89			echo "</tr>" >> $OUTFILE
90
91			done
92
93			cat >> $OUTFILE << EOF
94
95			</table>
96			</body>
97			</html>
98			EOF
99
100			chmod a+r $OUTFILE
101			echo "done"
102			}
103
104
105	edhill	1.1	# defaults
106			PERIOD=`date +%Y`"_"`date +%m`
107
108			# Parse options
109			ac_prev=
110			for ac_option ; do
111
112			# If the previous option needs an argument, assign it.
113			if test -n "$ac_prev"; then
114			eval "$ac_prev=\$ac_option"
115			ac_prev=
116			continue
117			fi
118
119			ac_optarg=`expr "x$ac_option" : 'x[^=]=\(.\)'`
120
121			case $ac_option in
122
123			-help \| --help \| -h \| --h)
124			usage ;;
125
126			-date \| --date \| -d \| --d)
127			ac_prev=PERIOD ;;
128			--date=* \| -date=*)
129			PERIOD=$ac_optarg ;;
130
131			*)
132			echo "Error: don't understand argument \"$ac_option\""
133			usage
134			;;
135
136			esac
137
138			done
139
140			INDIR="/u/u0/httpd/html/testing/results/$PERIOD"
141			OUTDIR="/u/u0/httpd/html/testing/summary"
142			OUTFILE=$OUTDIR"/summary_"$PERIOD".html"
143
144			# Create the "latest" links
145			echo "Creating the \"latest\" file for each machine: "
146			LATEST=$OUTDIR"/latest_"$PERIOD".html"
147	edhill	1.5	the_date=`date`
148	edhill	1.1	cat > $LATEST << EOF
149			<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
150			"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
151
152			<html xmlns="http://www.w3.org/1999/xhtml">
153			<head>
154			<title>MITgcm testing summary</title>
155			<meta name="author" content="Ed Hill" />
156
157			<!-- <base href="http://mitgcm.org/testing/summary/" /> -->
158
159			<!-- Hinting for menu generation -->
160	edhill	1.8	<meta name="add_name_0" content="Testing" />
161			<meta name="add_name_1" content="" />
162	edhill	1.1	<meta name="add_name_2" content="" />
163			<meta name="add_title" content="Testing" />
164			<!-- Hinting for menu generation -->
165
166			</head>
167			<body>
168	edhill	1.3	<p>The MITgcm model is tested
169	edhill	1.2	(compiled and run) in an automated fashion on a varirety of
170			different machines. The following is a summary of the MITgcm
171	edhill	1.3	verification suite for the time period: <b>$PERIOD</b>.</p>
172	edhill	1.2
173			<p>The machine naming scheme is:<br /></p>
174			<table align="center" cellpadding="0" border="0">
175	edhill	1.4	<tr bgcolor="#00cccc"> <td><b>Machine Type</b></td> <td><b>Nickname</b></td>
176	edhill	1.1	<td><b>Notes</b></td> </tr>
177
178	edhill	1.2	<tr bgcolor="#bbffdd"> <td>Intel P4</td> <td>"faulks"</td>
179			<td>Red Hat 7.3 (the "original" testing machine)</td> </tr>
180			<tr bgcolor="#bbddff"> <td>Intel P4</td> <td>"shelley"</td>
181			<td>Red Hat 9</td> </tr>
182
183			<tr bgcolor="#bbffdd"> <td> Intel P3/P4 Beowulf </td> <td>"myrinet"</td>
184			<td><a href="http://mitgcm.org/projects/MITGCM_CLUSTER/">MITgcm cluster
185			facility </a></td> </tr>
186	edhill	1.1	<tr bgcolor="#bbddff"> <td>Alpha cluster</td> <td>"halem"</td>
187			<td><a href="http://webserv.gsfc.nasa.gov/SCB/NCCS/systems/high-end-computing.html">
188			NASA NCCS Halem</a></td> </tr>
189
190			<tr bgcolor="#bbffdd"> <td> SGI Origin 2000 </td> <td>"hopper"</td>
191			<td><a href="http://www.nas.nasa.gov/User/Systemsdocs/O2K/o2k.html">
192			NAS SGI Origin 2000 </a></td> </tr>
193			<tr bgcolor="#bbddff"> <td> SGI Origin 3000 </td> <td>"lomax"</td>
194			<td><a href="http://www.nas.nasa.gov/User/Systemsdocs/O3K/o3k.html">
195			NAS SGI Origin 3000 </a></td> </tr>
196
197			<tr bgcolor="#bbffdd"> <td> SGI Altix </td> <td>"orion"</td>
198			<td><a href="http://sc.jpl.nasa.gov/">JPL Supercomputing and
199			Visualization Facility</a></td> </tr>
200			<tr bgcolor="#bbddff"> <td> IBM POWER3 SP </td> <td>"bf"</td>
201			<td><a href="http://www.scd.ucar.edu/computers/blackforest/">NCAR Blackforest
202			</a></td> </tr>
203
204			<tr bgcolor="#bbffdd"> <td> IBM POWER4 SP </td> <td>"bs"</td>
205			<td><a href="http://www.scd.ucar.edu/computers/bluesky/">NCAR Bluesky
206			</a></td> </tr>
207	edhill	1.4	<tr bgcolor="#bbddff"> <td> AMD Opteron </td> <td>"eaps"</td>
208			<td>SuSE Linux 9.0 (x86-64)</td> </tr>
209	edhill	1.1
210	edhill	1.6	<tr bgcolor="#bbffdd"> <td> Sun UltraSparc </td> <td>"slough"</td>
211			<td>Solaris 8</td> </tr>
212			<tr bgcolor="#bbddff"> <td> Intel P4 Mosix Cluster </td> <td>"sea"</td>
213			<td>Red Hat v7.2</td> </tr>
214
215	edhill	1.1	<!--
216			<tr bgcolor="#bbddff"> <td> </td> <td>""</td>
217			<td></td> </tr>
218			-->
219
220			</table>
221	edhill	1.2
222			<p><br />
223	edhill	1.3	The complete output for the verification runs can be found in
224	edhill	1.5	<a href="http://mitgcm.org/testing/summary/">the summary pages</a>
225			and the <a href="http://mitgcm.org/testing/results/">testing archives</a>.
226	edhill	1.2	The latest reports are:</p>
227	edhill	1.1	<table align="center" cellpadding="0" cellspacing="0" border="0" width="95%">
228			<tr bgcolor="#00cccc">
229	edhill	1.4	<td height="0"> <b>Nickname</b> </td>
230	edhill	1.1	<td> <b>OPTFILE Name</b> </td>
231	edhill	1.4	<td> <b>Type</b> </td>
232	edhill	1.5	<td> <b>Date</b> </td>
233	edhill	1.4	<td> <b>Summary</b> </td>
234	edhill	1.6	<td> <b>Ratio</b> </td>
235	edhill	1.1	</tr>
236
237			EOF
238
239			color="#bbffdd"
240			res_url="http://mitgcm.org/testing/"
241
242	edhill	1.6	MACHINES="faulks shelley myrinet eaps halem hopper lomax orion bf bs slough sea"
243	edhill	1.1
244			( cd $INDIR ; ls -1 ) > ./dir_all
245
246			for mname in $MACHINES ; do
247
248			echo " $mname"
249			if test "x$color" = x#bbffdd ; then
250			color="#bbddff"
251			else
252			color="#bbffdd"
253			fi
254
255			dir_list=`grep $mname ./dir_all`
256			echo -n "" > ./mlist
257
258			for i in $dir_list ; do
259
260			dir=$INDIR"/"$i
261			OPTFILE=
262			if test -r $dir/summary.txt ; then
263			comm=`grep 'OPTFILE=' $dir/summary.txt`
264			eval $comm
265			OPTFILE=${OPTFILE##*/}
266			fi
267			if test "x$OPTFILE" = x -a -r "$dir/genmake_state" ; then
268	edhill	1.3	comm=`grep 'OPTFILE=' $dir/genmake_state 2>/dev/null`
269	edhill	1.1	eval $comm
270			OPTFILE=${OPTFILE##*/}
271			fi
272			if test "x$OPTFILE" = x ; then
273	edhill	1.3	comm=`grep '^# OPTFILE=' $dir/*/Makefile 2>/dev/null \| head -1`
274			comm=${comm##*#}
275	edhill	1.1	eval $comm
276			OPTFILE=${OPTFILE##*/}
277			fi
278			if test "x$OPTFILE" = x ; then
279			OPTFILE="not_explicitly_specified"
280			fi
281	edhill	1.4
282			ADJOINT=
283			if test -r $dir/summary.txt ; then
284			comm=`grep 'ADJOINT=true' $dir/summary.txt 2>/dev/null`
285			eval $comm
286			fi
287			if test "x$ADJOINT" = x ; then
288			kind="forward"
289			else
290			test "x$ADJOINT" = xtrue && kind="adjoint"
291			fi
292
293	edhill	1.6	t_pass="--"
294			t_tot="--"
295			if test -r $dir/summary.txt ; then
296			grep '^[YN] [YN] [YN] [YN] ' $dir/summary.txt > ./all_tests 2>/dev/null
297			t_tot=`cat ./all_tests \| wc -l \| sed -e 's\| \|\|g'`
298			grep '^Y Y Y Y ' ./all_tests > ./all_ran 2>/dev/null
299	edhill	1.7	grep advect_ ./all_ran 2>/dev/null > ./all_ran_advect
300			t_advect=`cat ./all_ran_advect \| wc -l \| sed -e 's\| \|\|g'`
301			digits=`cat ./all_ran_advect \| awk '{print $9}'`
302			t_advect_pass=0
303			for k in $digits ; do
304			test "x$k" = x-- && k=0
305			test $k -ge 9 && t_advect_pass=$(( $t_advect_pass + 1 ))
306			done
307	edhill	1.6	grep -v advect ./all_ran 2>/dev/null > ./all_ran_noadvect
308			digits=`cat ./all_ran_noadvect \| awk '{print $5}'`
309			t_sum=0
310			for k in $digits ; do
311			test "x$k" = x-- && k=0
312			test $k -ge 9 && t_sum=$(( $t_sum + 1 ))
313			done
314	edhill	1.7	t_pass=$(( $t_sum + $t_advect_pass ))
315	edhill	1.6	fi
316	edhill	1.7	rm -f ./all_tests ./all_ran ./all_ran_advect ./all_ran_noadvect
317	edhill	1.6	# echo "${dir##*/} : $t_pass out of $t_tot"
318
319	edhill	1.1	tokens=`echo $i \| sed -e 's\|_\| \|g'`
320			echo "" > ./ms_tmp
321			for tok in $tokens ; do
322			echo $tok >> ./ms_tmp
323			done
324			DAY=`cat ./ms_tmp \| awk '(length($1)==8 && substr($1,0,3)=="200")'`
325			rm -f ./ms_tmp
326	edhill	1.4
327	edhill	1.6	echo "$OPTFILE$kind $DAY $OPTFILE $kind $i $t_pass:$t_tot" >> ./mlist
328	edhill	1.1
329			done
330
331			# helpful for debugging
332			# cat ./mlist
333
334			# Do we have any data? If so, create the latest pointer.
335			num=`wc -l ./mlist \| awk '{print $1}'`
336			if test $num -gt 0 ; then
337	edhill	1.4	keys=`cat ./mlist \| cut -d " " -f 1 \| sort \| uniq`
338	edhill	1.1
339	edhill	1.4	for key in $keys ; do
340			tline=`grep "^$key " ./mlist \| sort -r \| head -1`
341	edhill	1.6	ratio=`echo $tline \| cut -d " " -f 6`
342	edhill	1.4	ldir=`echo $tline \| cut -d " " -f 5`
343			kind=`echo $tline \| cut -d " " -f 4`
344			optf=`echo $tline \| cut -d " " -f 3`
345			DAY=`echo $tline \| cut -d " " -f 2`
346	edhill	1.1	URL="results/$PERIOD/$ldir"
347			cat <<EOF >>$LATEST
348			<tr bgcolor="$color">
349	edhill	1.4	<td height="0"> $mname </td>
350	edhill	1.1	<td> $optf </td>
351	edhill	1.4	<td> $kind </td>
352			<td> <a href="$res_url$URL">$DAY</a> </td>
353			<td> <a href="$res_url$URL/summary.txt"> summary.txt </a> </td>
354	edhill	1.6	<td> $ratio </td>
355	edhill	1.1	</tr>
356			EOF
357			done
358			fi
359
360			done
361
362			cat >> $LATEST << EOF
363	edhill	1.5	<tr bgcolor="#00cccc">
364	edhill	1.6	<td height="0" colspan="6" align="center" >This table generated on: $the_date</td>
365			</tr>
366	edhill	1.1
367			</table>
368	edhill	1.6
369			<p>Examples of the scripts used for these testing runs can be obtained
370			from <a
371			href="http://dev.mitgcm.org/cgi-bin/viewcvs.cgi/MITgcm_contrib/test_scripts/">
372			the "contrib" area of the MITgcm CVS archive</a>.</p>
373
374
375	edhill	1.1	</body>
376			</html>
377
378			EOF
379
380			rm -f ./dir_all ./mlist
381
382			CURR_PER=`date +%Y`"_"`date +%m`
383			if test "x$PERIOD" = "x$CURR_PER" ; then
384	edhill	1.2	cp $LATEST ./testing.xml
385	edhill	1.1	(
386			cd $OUTDIR
387			rm -f latest.html
388			ln -s $LATEST latest.html
389			)
390			fi