mirror of
git://git.sv.gnu.org/coreutils.git
synced 2026-04-20 18:56:39 +02:00
f38becab02
Initially, I did this,
git grep -l srcdir/test-lib.sh|xargs perl -p0i -e '~180-byte script'
but that line would have been much longer than the maximum permitted
by coreutils' commit hook, and wasn't readable besides, so here's a
more readable version:
lhs=$(printf '%s\\n' \
'if test "$VERBOSE" = yes; then' \
' set -x' \
' touch --version' \
'fi' \
'' \
'. $srcdir/test-lib.sh' \
| sed 's/\$/\\\$/g;s/touch/(\\w+)/')
rhs=$(printf '%s\\n' \
'. "${srcdir=.}/init.sh"; path_prepend_ ../src' \
'test "$VERBOSE" = yes && FIXME --version' \
| sed 's/\$/\\\$/g;s/FIXME/\$1/')
git grep -l srcdir/test-lib.sh|xargs perl -p0i -e "s,$lhs,$rhs,"
53 lines
1.8 KiB
Bash
Executable File
53 lines
1.8 KiB
Bash
Executable File
#!/bin/sh
|
|
# ensure that ls does not stat a symlink in an unusual case
|
|
|
|
# Copyright (C) 2007-2010 Free Software Foundation, Inc.
|
|
|
|
# This program is free software: you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation, either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
|
|
# This program is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
. "${srcdir=.}/init.sh"; path_prepend_ ../src
|
|
test "$VERBOSE" = yes && ls --version
|
|
require_strace_ stat
|
|
|
|
touch x || framework_failure
|
|
chmod a+x x || framework_failure
|
|
ln -s x link-to-x || framework_failure
|
|
|
|
|
|
# ls from coreutils 6.9 would unnecessarily stat a symlink in an unusual case:
|
|
# When not coloring orphan and missing entries, and without ln=target,
|
|
# ensure that ls -F (or -d, or -l: i.e., when not dereferencing)
|
|
# does not stat a symlink to directory, and does still color that
|
|
# symlink and an executable file properly.
|
|
|
|
LS_COLORS='or=0:mi=0:ex=01;32:ln=01;35' \
|
|
strace -qe stat ls -F --color=always x link-to-x > out.tmp 2> err || fail
|
|
# Elide info messages strace can send to stdout of the form:
|
|
# [ Process PID=1234 runs in 32 bit mode. ]
|
|
sed '/Process PID=/d' out.tmp > out
|
|
|
|
# With coreutils 6.9 and earlier, this file would contain a
|
|
# line showing ls had called stat on "x".
|
|
grep '^stat("x"' err && fail=1
|
|
|
|
# Check that output is colorized, as requested, too.
|
|
{
|
|
printf '\033[0m\033[01;35mlink-to-x\033[0m@\n'
|
|
printf '\033[01;32mx\033[0m*\n'
|
|
} > exp || fail=1
|
|
|
|
compare out exp || fail=1
|
|
|
|
Exit $fail
|