t/dejagnu4.sh

   1 #! /bin/sh
   2 # Copyright (C) 2003-2013 Free Software Foundation, Inc.
   3 #
   4 # This program is free software; you can redistribute it and/or modify
   5 # it under the terms of the GNU General Public License as published by
   6 # the Free Software Foundation; either version 2, or (at your option)
   7 # any later version.
   8 #
   9 # This program is distributed in the hope that it will be useful,
  10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 # GNU General Public License for more details.
  13 #
  14 # You should have received a copy of the GNU General Public License
  15 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
  16
  17 # Check that the DejaGnu rules work for a simple program and test case.
  18 # Also check PR 488: Failure of the first of several tools tested.
  19 # From the original bug report:
  20 #   If you use dejagnu for testing and have multiple tools (i.e.,
  21 #   multiple entries in the DEJATOOL variable) then the success/failure
  22 #   of "make check" is only dependent on the success/failure of the
  23 #   tests on the final tool. Thus there may be failures in the tests on
  24 #   previous tools, but at first glance "make check" has passed.
  25
  26 required=runtest
  27 . test-init.sh
  28
  29 cat > hammer << 'END'
  30 #! /bin/sh
  31 echo "Everything looks like a nail to me!"
  32 END
  33 chmod +x hammer
  34
  35 cat > spanner << 'END'
  36 #! /bin/sh
  37 echo "I'm a right spanner!"
  38 END
  39 chmod +x spanner
  40
  41 cat >> configure.ac << 'END'
  42 AC_OUTPUT
  43 END
  44
  45 cat > Makefile.am << 'END'
  46 AUTOMAKE_OPTIONS = dejagnu
  47
  48 DEJATOOL = hammer spanner
  49
  50 AM_RUNTESTFLAGS = HAMMER=$(srcdir)/hammer SPANNER=$(srcdir)/spanner
  51
  52 EXTRA_DIST  = hammer  hammer.test/hammer.exp
  53 EXTRA_DIST += spanner spanner.test/spanner.exp
  54 END
  55
  56 mkdir hammer.test spanner.test
  57
  58 cat > hammer.test/hammer.exp << 'END'
  59 set test test
  60 spawn $HAMMER
  61 expect {
  62     "Everything looks like a nail to me!" { pass "$test" }
  63     default { fail "$test" }
  64 }
  65 END
  66
  67 cat > spanner.test/spanner.exp << 'END'
  68 set test test
  69 spawn $SPANNER
  70 expect {
  71     "I'm a right spanner!" { pass "$test" }
  72     default { fail "$test" }
  73 }
  74 END
  75
  76 $ACLOCAL
  77 $AUTOCONF
  78 $AUTOMAKE --add-missing
  79
  80 ./configure
  81
  82 $MAKE check
  83 test -f hammer.log
  84 test -f hammer.sum
  85 test -f spanner.log
  86 test -f spanner.sum
  87
  88 $MAKE distcheck
  89
  90 # Test for PR 488.
  91 sed 's/E\(verything\)/Not e\1/' hammer > thammer
  92 mv -f thammer hammer
  93 chmod +x hammer
  94
  95 rm -f hammer.log hammer.sum spanner.log spanner.sum
  96 $MAKE check && exit 1
  97 test -f hammer.log
  98 test -f hammer.sum
  99 test -f spanner.log
 100 test -f spanner.sum
 101
 102 :