mirror of
git://git.sv.gnu.org/coreutils.git
synced 2026-02-27 17:47:29 +02:00
Transformed via this shell code:
t=$'\t'
git ls-files \
| grep -vE '(^|/)((GNU)?[Mm]akefile|ChangeLog)|\.(am|mk)$' \
| grep -vE 'tests/pr/|help2man' \
| xargs grep -lE "^ *$t" \
| xargs perl -MText::Tabs -ni -le \
'$m=/^( *\t[ \t]*)(.*)/; print $m ? expand($1) . $2 : $_'
69 lines
1.8 KiB
Bash
Executable File
69 lines
1.8 KiB
Bash
Executable File
#!/bin/sh
|
|
# Make sure "chown USER:GROUP FILE" works, and similar tests with separators.
|
|
|
|
# Copyright (C) 2004-2009 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/>.
|
|
|
|
if test "$VERBOSE" = yes; then
|
|
set -x
|
|
chown --version
|
|
fi
|
|
|
|
. $srcdir/test-lib.sh
|
|
|
|
id_u=`id -u` || framework_failure
|
|
test -n "$id_u" || framework_failure
|
|
|
|
id_un=`id -un` || framework_failure
|
|
test -n "$id_un" || framework_failure
|
|
|
|
id_g=`id -g` || framework_failure
|
|
test -n "$id_g" || framework_failure
|
|
|
|
id_gn=`id -gn` || framework_failure
|
|
test -n "$id_gn" || framework_failure
|
|
|
|
# FreeBSD 6.x's getgrnam fails to look up a group name containing
|
|
# a space. On such a system, skip this test if the group name contains
|
|
# a byte not in the portable filename character set.
|
|
case $host_triplet in
|
|
*-freebsd6.*)
|
|
case $id_gn in
|
|
*[^a-zA-Z0-9._-]*) skip_test_ "invalid group name: $id_gn";;
|
|
esac;;
|
|
*) ;;
|
|
esac
|
|
|
|
fail=0
|
|
|
|
chown '' . || fail=1
|
|
|
|
for u in $id_u "$id_un" ''; do
|
|
for g in $id_g "$id_gn" ''; do
|
|
case $u$g in
|
|
*.*) seps=':' ;;
|
|
*) seps=': .' ;;
|
|
esac
|
|
for sep in $seps; do
|
|
case $u$sep$g in
|
|
[0-9]*$sep) chown "$u$sep$g" . 2> /dev/null && fail=1 ;;
|
|
*) chown "$u$sep$g" . || fail=1 ;;
|
|
esac
|
|
done
|
|
done
|
|
done
|
|
|
|
Exit $fail
|