Blame tests/symlink

Packit 709fb3
#!/bin/sh
Packit 709fb3
# Check that "grep -r" does the right thing with symbolic links.
Packit 709fb3
Packit 709fb3
# Copyright (C) 2012-2017 Free Software Foundation, Inc.
Packit 709fb3
Packit 709fb3
# This program is free software: you can redistribute it and/or modify
Packit 709fb3
# it under the terms of the GNU General Public License as published by
Packit 709fb3
# the Free Software Foundation, either version 3 of the License, or
Packit 709fb3
# (at your option) any later version.
Packit 709fb3
Packit 709fb3
# This program is distributed in the hope that it will be useful,
Packit 709fb3
# but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit 709fb3
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit 709fb3
# GNU General Public License for more details.
Packit 709fb3
Packit 709fb3
# You should have received a copy of the GNU General Public License
Packit 709fb3
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
Packit 709fb3
Packit 709fb3
# written by Paul Eggert
Packit 709fb3
Packit 709fb3
. "${srcdir=.}/init.sh"; path_prepend_ ../src
Packit 709fb3
Packit 709fb3
mkdir dir || framework_failure_
Packit 709fb3
echo a > dir/a || framework_failure_
Packit 709fb3
echo b > dir/b || framework_failure_
Packit 709fb3
ln -s a dir/c || framework_failure_
Packit 709fb3
ln -s . dir/d || framework_failure_
Packit 709fb3
ln -s dangling dir/e || framework_failure_
Packit 709fb3
Packit 709fb3
touch out || framework_failure_
Packit 709fb3
Packit 709fb3
for recursion in '' -r -R
Packit 709fb3
do
Packit 709fb3
  for files in '' '*'
Packit 709fb3
  do
Packit 709fb3
    case $recursion,$files in
Packit 709fb3
      -R,* | *,'*') expected_status=2 ;;
Packit 709fb3
      *) expected_status=0 ;;
Packit 709fb3
    esac
Packit 709fb3
Packit 709fb3
    (cd dir && grep $recursion '^' $files grepout
Packit 709fb3
    test $? -eq $expected_status || fail=1
Packit 709fb3
Packit 709fb3
    case $recursion,$files in
Packit 709fb3
      ,)
Packit 709fb3
         exp='a\n' ;;
Packit 709fb3
      ,'*' | -R,)
Packit 709fb3
         exp='a:a\nb:b\nc:a\n' ;;
Packit 709fb3
      -r,)
Packit 709fb3
         exp='a:a\nb:b\n' ;;
Packit 709fb3
      -r,'*')
Packit 709fb3
         exp='a:a\nb:b\nc:a\nd/a:a\nd/b:b\n' ;;
Packit 709fb3
      -R,'*')
Packit 709fb3
         exp='a:a\nb:b\nc:a\nd/a:a\nd/b:b\nd/c:a\n' ;;
Packit 709fb3
      *)
Packit 709fb3
         framework_failure_ ;;
Packit 709fb3
    esac
Packit 709fb3
Packit 709fb3
    printf "$exp" >exp || framework_failure_
Packit 709fb3
Packit 709fb3
    LC_ALL=C sort grepout >out-t || fail=1
Packit 709fb3
Packit 709fb3
    # Ignore "Binary file d matches" on systems for which
Packit 709fb3
    # reading from a directory actually succeeds.
Packit 709fb3
    grep -v Binary out-t > out; case $? in 0|1) ;; *) fail=1;; esac
Packit 709fb3
Packit 709fb3
    compare exp out || fail=1
Packit 709fb3
  done
Packit 709fb3
done
Packit 709fb3
Packit 709fb3
Exit $fail