* test_summary: updated to version in development branch

From-SVN: r23960

diff --git a/contrib/ChangeLog b/contrib/ChangeLog
index 7422e08962fcdaccc4619930cdefe70190083324..ed8cba157093cd5c6a642516cb67f9132cd95889 100644 (file)
--- a/contrib/ChangeLog
+++ b/contrib/ChangeLog
@@ -1,3 +1,7 @@
+1998-11-29  Alexandre Oliva  <oliva@dcc.unicamp.br>
+
+       * test_summary: updated to version in development branch
+
 1998-08-14  Alexandre Oliva  <oliva@dcc.unicamp.br>
 
        * test_installed: new script for testing already-installed

diff --git a/contrib/test_summary b/contrib/test_summary
index 21660bfd883f316eea62cc5c45ab0c39e9f212f0..387beb8f44c8a66f830454d72af614f13e3ecfbc 100755 (executable)
--- a/contrib/test_summary
+++ b/contrib/test_summary
@@ -23,16 +23,19 @@
 
 # The usage pattern of this script is as follows:
 
-# summarize | more   # so as to observe what should be done
+# test_summary | more   # so as to observe what should be done
 
-# summarize | sh     # so as to actually send e-mail and move log files
+# test_summary | sh     # so as to actually send e-mail and move log files
 
 # It accepts a few command line arguments.  For example:
 # -o: re-reads logs that have been mailed already (.sum.sent)
 # -t: prevents logs from being renamed
+# -p: prepend specified file (or list of files: -p "a b") to the report
 # -i: append specified file (or list of files: -i "a b") to the report
-# -m: specify the e-mail address to send notes to.  An appropriate default should be selected from the log files.
-# -f: force reports to be mailed; if omitted, only reports that differ from the sent.* version are sent
+# -m: specify the e-mail address to send notes to.  An appropriate default
+#     should be selected from the log files.
+# -f: force reports to be mailed; if omitted, only reports that differ
+#     from the sent.* version are sent.
 
 # Find a good awk.
 if test -z "$AWK" ; then
@@ -52,6 +55,7 @@ while true; do
     case "$1" in 
       -o) filesuffix=.sent; move=false; : ${mailto=nobody}; shift;;
       -t) move=false; shift;;
+      -p) prepend_logs=${prepend_logs+"$prepend_logs "}"$2"; shift 2;;
       -i) append_logs=${append_logs+"$append_logs "}"$2"; shift 2;;
       -m) mailto=$2; forcemail=true; shift 2;;
       -f) unset mailto; forcemail=true; shift;;
@@ -81,7 +85,8 @@ if $forcemail || $anychange; then :; else mailto=nobody; fi &&
 $AWK '
 BEGIN {
   lang="";
-  print "cat <<EOF |";
+  print "cat <<\\EOF |";
+'${prepend_logs+"  system(\"cat $prepend_logs\"); "}'
 }
 $1 ~ /\/configure$/ { $1 = "configure flags:"; configflags = $0 }
 /^Running target / { print ""; print; }
@@ -91,13 +96,13 @@ $1 ~ /\/configure$/ { $1 = "configure flags:"; configflags = $0 }
   if (lang == "") lang = " "$2" "; else lang = " ";
 }
 /\/ss(\/|c? )/ {
-  program="ss"; comment="";
+  program="ss";
   if (lang == " ") address="nobody";
   else if (lang == " gcc ") address="gcc2@cygnus.com";
   else address="g++@cygnus.com";
 }
 /\/egcsh?((-[^ ]*)?\/|c?[ -])/ {
-  address="egcs@cygnus.com";
+  address="egcs-testresults@egcs.cygnus.com";
   if (version == 0) version="egcs";
 }
 /--disable-haifa/ { prefix="haifa-disabled "; }
@@ -112,6 +117,8 @@ $2 == "version" { save = $0; $1 = ""; $2 = ""; version = $0; gsub(/^ */, "", ver
 /^$/ && blanks>0 { print; --blanks; }
 END { if (lang != "") {
   print "";
+  print "Compiler version: " prefix version lang;
+  print "Platform: " host;
   print configflags;
   '${BOOT_CFLAGS+'print "BOOT_CFLAGS='"${BOOT_CFLAGS}"'";'}'
   if (boot_cflags != 0) print boot_cflags;