bin/ed/test/ckscripts.sh

   1 #!/bin/sh -
   2 #       $NetBSD: ckscripts.sh,v 1.9 1995/04/23 10:07:34 cgd Exp $
   3 #
   4 # This script runs the .ed scripts generated by mkscripts.sh
   5 # and compares their output against the .r files, which contain
   6 # the correct output
   7
   8 PATH="/bin:/usr/bin:/usr/local/bin/:."
   9 ED=$1
  10 [ ! -x $ED ] && { echo "$ED: cannot execute"; exit 1; }
  11
  12 # Run the *.red scripts first, since these don't generate output;
  13 # they exit with non-zero status
  14 for i in *.red; do
  15         echo $i
  16         if $i; then
  17                 echo "*** The script $i exited abnormally  ***"
  18         fi
  19 done >errs.o 2>&1
  20
  21 # Run the remainding scripts; they exit with zero status
  22 for i in *.ed; do
  23 #       base=`expr $i : '\([^.]*\)'`
  24 #       base=`echo $i | sed 's/\..*//'`
  25         base=`$ED - \!"echo $i" <<-EOF
  26                 s/\..*
  27         EOF`
  28         if $base.ed; then
  29                 if cmp -s $base.o $base.r; then :; else
  30                         echo "*** Output $base.o of script $i is incorrect ***"
  31                 fi
  32         else
  33                 echo "*** The script $i exited abnormally ***"
  34         fi
  35 done >scripts.o 2>&1
  36
  37 grep -h '\*\*\*' errs.o scripts.o