tests/chmod/c-option

   1 #!/bin/sh
   2 # Verify that chmod's --changes (-c) option works.
   3
   4 # Copyright (C) 2000, 2004, 2006 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 2 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, write to the Free Software
  18 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  19 # 02110-1301, USA.
  20
  21 if test "$VERBOSE" = yes; then
  22   set -x
  23   chmod --version
  24 fi
  25
  26 . $srcdir/../lang-default
  27
  28 pwd=`pwd`
  29 tmp=c-option.$$
  30 trap 'status=$?; cd "$pwd" && rm -rf $tmp && exit $status' 0
  31 trap '(exit $?); exit' 1 2 13 15
  32
  33 framework_failure=0
  34
  35 # Record absolute path of srcdir.
  36 cd $srcdir || framework_failure=1
  37 abs_srcdir=`pwd`
  38
  39 cd "$pwd" || framework_failure=1
  40 mkdir $tmp || framework_failure=1
  41 cd $tmp || framework_failure=1
  42
  43 umask 0
  44 file=f
  45 touch $file || framework_failure=1
  46 chmod 444 $file || framework_failure=1
  47
  48 if test $framework_failure = 1; then
  49   echo 'failure in testing framework'
  50   (exit 1); exit 1
  51 fi
  52
  53 . "$abs_srcdir/../setgid-check"
  54
  55 fail=0
  56
  57 chmod u=rwx $file || fail=1
  58 chmod -c g=rwx $file > out || fail=1
  59 chmod -c g=rwx $file > empty || fail=1
  60
  61 test -s empty && fail=1
  62 case "`cat out`" in
  63   "mode of \`f' changed to 0774 "?rwxrwxr--?) ;;
  64   *) fail=1 ;;
  65 esac
  66
  67 (exit $fail); exit $fail