diff options
| -rw-r--r-- | ChangeLog | 7 | ||||
| -rw-r--r-- | tests/ls/Makefile.am | 2 | ||||
| -rwxr-xr-x | tests/ls/nameless-uid | 65 |
3 files changed, 74 insertions, 0 deletions
@@ -1,3 +1,10 @@ +2006-11-20 Jim Meyering <jim@meyering.net> + + Add a root-only test for today's lib/idcache.c fix. + * tests/ls/nameless-uid: New file. + * tests/ls/Makefile.am (TESTS): Add nameless-uid. + (TESTS_ENVIRONMENT): Add PERL to the list. + 2006-11-19 Jim Meyering <jim@meyering.net> * tests/tail-2/assert-2: Mark as a very-expensive test, because I diff --git a/tests/ls/Makefile.am b/tests/ls/Makefile.am index 9be242345..804e35061 100644 --- a/tests/ls/Makefile.am +++ b/tests/ls/Makefile.am @@ -21,6 +21,7 @@ AUTOMAKE_OPTIONS = 1.2 gnits TESTS = \ + nameless-uid \ color-dtype-dir \ stat-failed \ stat-dtype \ @@ -33,4 +34,5 @@ TESTS_ENVIRONMENT = \ top_srcdir=$(top_srcdir) \ srcdir=$(srcdir) \ PATH="$(VG_PATH_PREFIX)`pwd`/../../src$(PATH_SEPARATOR)$$PATH" \ + PERL="$(PERL)" \ PROG=ls diff --git a/tests/ls/nameless-uid b/tests/ls/nameless-uid new file mode 100755 index 000000000..70b06132f --- /dev/null +++ b/tests/ls/nameless-uid @@ -0,0 +1,65 @@ +#!/bin/sh +# Ensure that ls -l works on files with nameless uid and/or gid + +# Copyright (C) 2006 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 2 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, write to the Free Software +# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA +# 02110-1301, USA. + +if test "$VERBOSE" = yes; then + set -x + ls --version +fi + +. $srcdir/../envvar-check +. $srcdir/../lang-default +PRIV_CHECK_ARG=require-root . $srcdir/../priv-check + +$PERL -e 1 > /dev/null 2>&1 || { + echo 1>&2 "$0: configure didn't find a usable version of Perl," \ + "so can't run this test" + (exit 77); exit 77 +} + +nameless_uid=`$PERL -e 'foreach my $i (1000..16*1024) { getpwuid $i or (print "$i\n"), exit }'` + +if test x$nameless_uid = x; then + echo "$0: couldn't find a nameless UID" 1>&2 + (exit 77); exit 77 +fi + +pwd=`pwd` +t0=`echo "$0"|sed 's,.*/,,'`.tmp; tmp=$t0/$$ +trap 'status=$?; cd "$pwd" && chmod -R u+rwx $t0 && rm -rf $t0 && exit $status' 0 +trap '(exit $?); exit $?' 1 2 13 15 + +framework_failure=0 +mkdir -p $tmp || framework_failure=1 +cd $tmp || framework_failure=1 + +touch f || framework_failure=1 +chown $nameless_uid f || framework_failure=1 + +if test $framework_failure = 1; then + echo "$0: failure in testing framework" 1>&2 + (exit 1); exit 1 +fi + +fail=0 + +set -- `ls -o f` || fail=1 +test $3 = $nameless_uid || fail=1 + +(exit $fail); exit $fail |