--- gforth/testall	2000/09/15 21:32:06	1.8
+++ gforth/testall	2008/11/01 18:03:06	1.22
@@ -1,14 +1,26 @@
-#! /usr/local/bin/bash
+#! /bin/bash
 #test dist on all MACHINES given in MACHINES
 #usage: MACHINES="..." testall dirs/gforth-version.tar.gz
-test "x$MACHINES" != x || MACHINES="jupiter pcs d0 mips aertl@fpr.zserv.tuwien.ac.at aertl@fbma.tuwien.ac.at aertl@stat.zserv.tuwien.ac.at a5 w4.infosys.tuwien.ac.at samhain.ifs.tuwien.ac.at a9"
-#taken out: hpws03.infosys.tuwien.ac.at calis
+if test $# = 0; then
+  echo "usage: `basename $0` gforth-xxx.tar.gz"
+  exit 1
+fi
+test "x$MACHINES" != x || 
+MACHINES="a7 akrall@titan.zserv.tuwien.ac.at b2 b3 b6 c4 c6 c7 c8 iyonix mips ppc64 t1000"
+#left out: c1 (NFS problem?), a5 (no working compiler with the right name)
+#SSH_PROTOCOL=-oProtocol=1,2
 for i in $MACHINES
 do
-	( ssh $i "test -d xxxgforthtest||mkdir xxxgforthtest; cd xxxgforthtest; test -d $i||mkdir $i; rm -rf $i/*"; \
-	 scp -pq $1 testdist $i:xxxgforthtest/$i; \
-	 ssh $i "cd xxxgforthtest/$i; ./testdist `basename $1`" >$i 2>&1; \
-	 echo "$i done" `tail -1 $i`) &
+  if false; then
+    echo; echo $i
+    /usr/bin/ssh $SSH_PROTOCOL -x $i echo ok
+  else
+    ( ssh $SSH_PROTOCOL -q -x $i "test -d xxxgforthtest||mkdir xxxgforthtest; cd xxxgforthtest; test -d $i||mkdir $i; rm -rf $i/*" >$i 2>&1; \
+      scp $SSH_PROTOCOL -p -q $1 ../testdist $i:xxxgforthtest/$i >>$i 2>&1; \
+      ssh $SSH_PROTOCOL -q -x $i "cd xxxgforthtest/$i; nice ./testdist `basename $1`" >>$i 2>&1; \
+      echo "$i done" "`tail -1 $i`" `grep "checking host system type..." $i|sed 's/checking host system type... //'|uniq` `grep "^gcc.*ok" $i`
+      grep -A 2 "sieve bubble matrix  fib" $i; echo) &
+  fi
 done
 wait
 echo all done