doc: move @shortcontents and @contents from end to start
[platform/upstream/coreutils.git] / tests / cp / perm
1 #!/bin/sh
2 # Make sure the permission-preserving code in copy.c (mv, cp, install) works.
3
4 # Copyright (C) 2000, 2002, 2004-2008 Free Software Foundation, Inc.
5
6 # This program is free software: you can redistribute it and/or modify
7 # it under the terms of the GNU General Public License as published by
8 # the Free Software Foundation, either version 3 of the License, or
9 # (at your option) any later version.
10
11 # This program is distributed in the hope that it will be useful,
12 # but WITHOUT ANY WARRANTY; without even the implied warranty of
13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 # GNU General Public License for more details.
15
16 # You should have received a copy of the GNU General Public License
17 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
18
19 if test "$VERBOSE" = yes; then
20   set -x
21   cp --version
22   mv --version
23 fi
24
25 . $srcdir/test-lib.sh
26 very_expensive_
27
28 umask 037
29
30 fail=0
31
32 # Now, try it with `mv', with combinations of --force, no-f and
33 # existing-destination and not.
34 for u in 31 37 2; do
35   echo umask: $u
36   umask $u
37   for cmd in mv 'cp -p' cp; do
38     for force in '' -f; do
39       for existing_dest in yes no; do
40         for g_perm in r w x rw wx xr rwx; do
41           for o_perm in r w x rw wx xr rwx; do
42             touch src || exit 1
43             chmod u=r,g=rx,o= src || exit 1
44             expected_perms=$(stat --format=%A src)
45             rm -f dest
46             test $existing_dest = yes && {
47               touch dest || exit 1
48               chmod u=rw,g=$g_perm,o=$o_perm dest || exit 1
49               }
50             $cmd $force src dest || exit 1
51             test "$cmd" = mv && test -f src && exit 1
52             test "$cmd" = cp && { test -f src || exit 1; }
53             actual_perms=$(stat --format=%A dest)
54
55             case "$cmd:$force:$existing_dest" in
56               cp:*:yes)
57                 _g_perm=`echo rwx|sed 's/[^'$g_perm']/-/g'`
58                 _o_perm=`echo rwx|sed 's/[^'$o_perm']/-/g'`
59                 expected_perms=-rw-$_g_perm$_o_perm
60                 ;;
61               cp:*:no)
62                 test $u = 37 &&
63                   expected_perms=`echo $expected_perms|sed 's/.....$/-----/'`
64                 test $u = 31 &&
65                   expected_perms=`echo $expected_perms|sed 's/..\(..\).$/--\1-/'`
66                 ;;
67             esac
68             test _$actual_perms = _$expected_perms || exit 1
69             # Perform only one iteration when there's no existing destination.
70             test $existing_dest = no && break 3
71           done
72         done
73       done
74     done
75   done
76 done
77
78 Exit $fail