.

diff --git a/tests/tail/.cvsignore b/tests/tail/.cvsignore
new file mode 100644 (file)
index 0000000..c5c16f2
--- /dev/null
+++ b/tests/tail/.cvsignore
@@ -0,0 +1,9 @@
+t*.out
+t*.in
+t*.exp
+tB.err
+tR0.0.err
+tR0.1.err
+build-script
+Makefile
+mk-script

diff --git a/tests/tail/Makefile.am b/tests/tail/Makefile.am
new file mode 100644 (file)
index 0000000..1f04832
--- /dev/null
+++ b/tests/tail/Makefile.am
@@ -0,0 +1,43 @@
+## Process this file with automake to produce Makefile.in.
+
+##test-files-begin
+x = tail
+explicit =
+maint_gen = t1.in t1.exp t2.in t2.exp t3.in t3.exp t4.in t4.exp t5.in t5.exp
+run_gen = t1.out t1.err t2.out t2.err t3.out t3.err t4.out t4.err t5.out \
+t5.err
+##test-files-end
+
+EXTRA_DIST = mk-script.pl Test.pm $x-tests $(explicit) $(maint_gen)
+noinst_SCRIPTS = $x-tests
+
+PERL = @PERL@
+editpl = sed -e 's,@''PERL''@,$(PERL),g' -e 's,@''srcdir''@,@srcdir@,g'
+
+TESTS = $x-tests
+
+$x-tests: @MAINT@mk-script Test.pm
+       ./mk-script ../../src/$x > $@.n
+       mv $@.n $@
+       chmod 755 $@
+
+SUFFIXES = .pl
+
+.pl:
+       rm -f $@ $@.tmp
+       $(editpl) $< > $@.tmp
+       chmod +x-w $@.tmp
+       mv $@.tmp $@
+
+MAINTAINERCLEANFILES = $x-tests $(maint_gen)
+CLEANFILES = $(run_gen)
+
+@MAINT@rebuild-check: Test.pm mk-script
+@MAINT@        rb=rb-check; rm -f $rb; \
+@MAINT@        m_template=../Makefile.am.in; \
+@MAINT@        sed -n '1,/^##test-files-begin/p' $$m_template > $$rb; \
+@MAINT@        tool=`echo $(subdir)|sed 's/^tests.//;s/-test//'`; \
+@MAINT@        echo "x = $$tool" >> $$rb; \
+@MAINT@        ./mk-script --list >> $$rb; \
+@MAINT@        sed -n '/^##test-files-end/,$$p' $$m_template >> $$rb; \
+@MAINT@        diff -u Makefile.am $$rb && echo ok || echo no

diff --git a/tests/tail/Makefile.in b/tests/tail/Makefile.in
new file mode 100644 (file)
index 0000000..ff534c4
--- /dev/null
+++ b/tests/tail/Makefile.in
@@ -0,0 +1,201 @@
+# Makefile.in generated automatically by automake 1.1l from Makefile.am
+
+# Copyright (C) 1994, 1995, 1996 Free Software Foundation, Inc.
+# This Makefile.in is free software; the Free Software Foundation
+# gives unlimited permission to copy, distribute and modify it.
+
+
+SHELL = /bin/sh
+
+srcdir = @srcdir@
+top_srcdir = @top_srcdir@
+VPATH = @srcdir@
+prefix = @prefix@
+exec_prefix = @exec_prefix@
+
+bindir = @bindir@
+sbindir = @sbindir@
+libexecdir = @libexecdir@
+datadir = @datadir@
+sysconfdir = @sysconfdir@
+sharedstatedir = @sharedstatedir@
+localstatedir = @localstatedir@
+libdir = @libdir@
+infodir = @infodir@
+mandir = @mandir@
+includedir = @includedir@
+oldincludedir = /usr/include
+
+pkgdatadir = $(datadir)/@PACKAGE@
+pkglibdir = $(libdir)/@PACKAGE@
+pkgincludedir = $(includedir)/@PACKAGE@
+
+top_builddir = ../..
+
+INSTALL = @INSTALL@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_DATA = @INSTALL_DATA@
+INSTALL_SCRIPT = @INSTALL_SCRIPT@
+transform = @program_transform_name@
+RANLIB = @RANLIB@
+GENCAT = @GENCAT@
+GMSGFMT = @GMSGFMT@
+CC = @CC@
+
+x = tail
+explicit =
+maint_gen = t1.in t1.exp t2.in t2.exp t3.in t3.exp t4.in t4.exp t5.in t5.exp
+run_gen = t1.out t1.err t2.out t2.err t3.out t3.err t4.out t4.err t5.out \
+t5.err
+
+EXTRA_DIST = mk-script.pl Test.pm $x-tests $(explicit) $(maint_gen)
+noinst_SCRIPTS = $x-tests
+
+PERL = @PERL@
+editpl = sed -e 's,@''PERL''@,$(PERL),g' -e 's,@''srcdir''@,@srcdir@,g'
+
+TESTS = $x-tests
+
+SUFFIXES = .pl
+
+MAINTAINERCLEANFILES = $x-tests $(maint_gen)
+CLEANFILES = $(run_gen)
+mkinstalldirs = $(SHELL) $(top_srcdir)/mkinstalldirs
+CONFIG_HEADER = ../../config.h
+CONFIG_CLEAN_FILES = 
+SCRIPTS =  $(noinst_SCRIPTS)
+
+DIST_COMMON =  Makefile.am Makefile.in
+
+
+PACKAGE = @PACKAGE@
+VERSION = @VERSION@
+
+DISTFILES = $(DIST_COMMON) $(SOURCES) $(HEADERS) \
+       $(TEXINFOS) $(MANS) $(EXTRA_DIST)
+
+TAR = tar
+default: all
+
+.SUFFIXES:
+.SUFFIXES: .pl
+$(srcdir)/Makefile.in: @MAINT@ Makefile.am $(top_srcdir)/configure.in $(ACLOCAL) 
+       cd $(top_srcdir) && automake --gnu tests/tail/Makefile
+
+Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status $(BUILT_SOURCES)
+       cd $(top_builddir) \
+         && CONFIG_FILES=$(subdir)/$@ CONFIG_HEADERS= $(SHELL) ./config.status
+
+tags: TAGS
+TAGS:
+
+
+distdir = $(top_builddir)/$(PACKAGE)-$(VERSION)/$(subdir)
+
+subdir = tests/tail
+distdir: $(DISTFILES)
+       @for file in $(DISTFILES); do \
+         d=$(srcdir); \
+         test -f $(distdir)/$$file \
+         || ln $$d/$$file $(distdir)/$$file 2> /dev/null \
+         || cp -p $$d/$$file $(distdir)/$$file; \
+       done
+check-TESTS: $(TESTS)
+       @failed=0; all=0; \
+       srcdir=$(srcdir); export srcdir; \
+       for tst in $(TESTS); do \
+         all=`expr $$all + 1`; \
+         if test -f $$tst; then dir=.; \
+         else dir="$(srcdir)"; fi; \
+         if $(TESTS_ENVIRONMENT) $$dir/$$tst; then \
+           echo "PASS: $$tst"; \
+         else \
+           failed=`expr $$failed + 1`; \
+           echo "FAIL: $$tst"; \
+         fi; \
+       done; \
+       if test "$$failed" -eq 0; then \
+         echo "========================"; \
+         echo "All $$all tests passed"; \
+         echo "========================"; \
+       else \
+         echo "$$failed of $$all tests failed"; \
+       fi
+info:
+dvi:
+check: all
+       $(MAKE) check-TESTS
+installcheck:
+install-exec: 
+       $(NORMAL_INSTALL)
+
+install-data: 
+       $(NORMAL_INSTALL)
+
+install: install-exec install-data all
+       @:
+
+uninstall: 
+
+all: $(SCRIPTS) Makefile
+
+install-strip:
+       $(MAKE) INSTALL_PROGRAM='$(INSTALL_PROGRAM) -s' install
+installdirs:
+
+
+mostlyclean-generic:
+       test -z "$(MOSTLYCLEANFILES)" || rm -f $(MOSTLYCLEANFILES)
+
+clean-generic:
+       test -z "$(CLEANFILES)" || rm -f $(CLEANFILES)
+
+distclean-generic:
+       rm -f Makefile $(DISTCLEANFILES)
+       rm -f config.cache config.log stamp-h
+       test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES)
+
+maintainer-clean-generic:
+       test -z "$(MAINTAINERCLEANFILES)" || rm -f $(MAINTAINERCLEANFILES)
+       test -z "$(BUILT_SOURCES)" || rm -f $(BUILT_SOURCES)
+mostlyclean:  mostlyclean-generic
+
+clean:  clean-generic mostlyclean
+
+distclean:  distclean-generic clean
+       rm -f config.status
+
+maintainer-clean:  maintainer-clean-generic distclean
+       @echo "This command is intended for maintainers to use;"
+       @echo "it deletes files that may require special tools to rebuild."
+
+.PHONY: default tags distdir check-TESTS info dvi installcheck \
+install-exec install-data install uninstall all installdirs \
+mostlyclean-generic distclean-generic clean-generic \
+maintainer-clean-generic clean mostlyclean distclean maintainer-clean
+
+
+$x-tests: @MAINT@mk-script Test.pm
+       ./mk-script ../../src/$x > $@.n
+       mv $@.n $@
+       chmod 755 $@
+
+.pl:
+       rm -f $@ $@.tmp
+       $(editpl) $< > $@.tmp
+       chmod +x-w $@.tmp
+       mv $@.tmp $@
+
+@MAINT@rebuild-check: Test.pm mk-script
+@MAINT@        rb=rb-check; rm -f $rb; \
+@MAINT@        m_template=../Makefile.am.in; \
+@MAINT@        sed -n '1,/^##test-files-begin/p' $$m_template > $$rb; \
+@MAINT@        tool=`echo $(subdir)|sed 's/^tests.//;s/-test//'`; \
+@MAINT@        echo "x = $$tool" >> $$rb; \
+@MAINT@        ./mk-script --list >> $$rb; \
+@MAINT@        sed -n '/^##test-files-end/,$$p' $$m_template >> $$rb; \
+@MAINT@        diff -u Makefile.am $$rb && echo ok || echo no
+
+# Tell versions [3.59,3.63) of GNU make to not export all variables.
+# Otherwise a system limit (for SysV at least) may be exceeded.
+.NOEXPORT:

diff --git a/tests/tail/Test.pm b/tests/tail/Test.pm
new file mode 100755 (executable)
index 0000000..05feee6
--- /dev/null
+++ b/tests/tail/Test.pm
@@ -0,0 +1,22 @@
+package Test;
+require 5.002;
+use strict;
+
+$Test::input_via_stdin = 1;
+
+my @tv = (
+# test name, options, input, expected output, expected return code
+#
+['1', '+2c', 'abcd', 'bcd', 0],
+['2', '+8c', 'abcd', '', 0],
+['3', '-1c', 'abcd', 'd', 0],
+['4', '-9c', 'abcd', 'abcd', 0],
+['5', '-12c', 'x' . ('y' x 12) . 'z', ('y' x 11) . 'z', 0],
+);
+
+sub test_vector
+{
+  return @tv;
+}
+
+1;

diff --git a/tests/tail/tail-tests b/tests/tail/tail-tests
new file mode 100755 (executable)
index 0000000..6804eea
--- /dev/null
+++ b/tests/tail/tail-tests
@@ -0,0 +1,103 @@
+#! /bin/sh
+# This script was generated automatically by build-script.
+case $# in
+  0) xx='../../src/tail';;
+  *) xx="$1";;
+esac
+test "$VERBOSE" && echo=echo || echo=:
+$echo testing program: $xx
+errors=0
+test "$srcdir" || srcdir=.
+test "$VERBOSE" && $xx --version 2> /dev/null
+$xx +2c < $srcdir/t1.in > t1.out 2> t1.err
+code=$?
+if test $code != 0 ; then
+  $echo Test 1 failed: ../../src/tail return code $code differs from expected value 0 1>&2
+  errors=`expr $errors + 1`
+else
+  cmp t1.out $srcdir/t1.exp
+  case $? in
+    0) if test "$VERBOSE" ; then $echo passed 1; fi ;; # equal files
+    1) $echo Test 1 failed: files t1.out and $srcdir/t1.exp differ 1>&2;
+       errors=`expr $errors + 1` ;;
+    2) $echo Test 1 may have failed. 1>&2;
+       $echo The command "cmp t1.out $srcdir/t1.exp" failed. 1>&2 ;
+       errors=`expr $errors + 1` ;;
+  esac
+fi
+test -s t1.err || rm -f t1.err
+$xx +8c < $srcdir/t2.in > t2.out 2> t2.err
+code=$?
+if test $code != 0 ; then
+  $echo Test 2 failed: ../../src/tail return code $code differs from expected value 0 1>&2
+  errors=`expr $errors + 1`
+else
+  cmp t2.out $srcdir/t2.exp
+  case $? in
+    0) if test "$VERBOSE" ; then $echo passed 2; fi ;; # equal files
+    1) $echo Test 2 failed: files t2.out and $srcdir/t2.exp differ 1>&2;
+       errors=`expr $errors + 1` ;;
+    2) $echo Test 2 may have failed. 1>&2;
+       $echo The command "cmp t2.out $srcdir/t2.exp" failed. 1>&2 ;
+       errors=`expr $errors + 1` ;;
+  esac
+fi
+test -s t2.err || rm -f t2.err
+$xx -1c < $srcdir/t3.in > t3.out 2> t3.err
+code=$?
+if test $code != 0 ; then
+  $echo Test 3 failed: ../../src/tail return code $code differs from expected value 0 1>&2
+  errors=`expr $errors + 1`
+else
+  cmp t3.out $srcdir/t3.exp
+  case $? in
+    0) if test "$VERBOSE" ; then $echo passed 3; fi ;; # equal files
+    1) $echo Test 3 failed: files t3.out and $srcdir/t3.exp differ 1>&2;
+       errors=`expr $errors + 1` ;;
+    2) $echo Test 3 may have failed. 1>&2;
+       $echo The command "cmp t3.out $srcdir/t3.exp" failed. 1>&2 ;
+       errors=`expr $errors + 1` ;;
+  esac
+fi
+test -s t3.err || rm -f t3.err
+$xx -9c < $srcdir/t4.in > t4.out 2> t4.err
+code=$?
+if test $code != 0 ; then
+  $echo Test 4 failed: ../../src/tail return code $code differs from expected value 0 1>&2
+  errors=`expr $errors + 1`
+else
+  cmp t4.out $srcdir/t4.exp
+  case $? in
+    0) if test "$VERBOSE" ; then $echo passed 4; fi ;; # equal files
+    1) $echo Test 4 failed: files t4.out and $srcdir/t4.exp differ 1>&2;
+       errors=`expr $errors + 1` ;;
+    2) $echo Test 4 may have failed. 1>&2;
+       $echo The command "cmp t4.out $srcdir/t4.exp" failed. 1>&2 ;
+       errors=`expr $errors + 1` ;;
+  esac
+fi
+test -s t4.err || rm -f t4.err
+$xx -12c < $srcdir/t5.in > t5.out 2> t5.err
+code=$?
+if test $code != 0 ; then
+  $echo Test 5 failed: ../../src/tail return code $code differs from expected value 0 1>&2
+  errors=`expr $errors + 1`
+else
+  cmp t5.out $srcdir/t5.exp
+  case $? in
+    0) if test "$VERBOSE" ; then $echo passed 5; fi ;; # equal files
+    1) $echo Test 5 failed: files t5.out and $srcdir/t5.exp differ 1>&2;
+       errors=`expr $errors + 1` ;;
+    2) $echo Test 5 may have failed. 1>&2;
+       $echo The command "cmp t5.out $srcdir/t5.exp" failed. 1>&2 ;
+       errors=`expr $errors + 1` ;;
+  esac
+fi
+test -s t5.err || rm -f t5.err
+if test $errors = 0 ; then
+  $echo Passed all 5 tests. 1>&2
+else
+  $echo Failed $errors tests. 1>&2
+fi
+test $errors = 0 || errors=1
+exit $errors