/posix/globtest.sh
Shell | 812 lines | 729 code | 39 blank | 44 comment | 60 complexity | 366a59107ed6af1a3b65aa08aa1ac0ee MD5 | raw file
- #!/bin/bash
- # Test for glob(3).
- # Copyright (C) 1997-2016 Free Software Foundation, Inc.
- # This file is part of the GNU C Library.
- # The GNU C Library is free software; you can redistribute it and/or
- # modify it under the terms of the GNU Lesser General Public
- # License as published by the Free Software Foundation; either
- # version 2.1 of the License, or (at your option) any later version.
- # The GNU C Library 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
- # Lesser General Public License for more details.
- # You should have received a copy of the GNU Lesser General Public
- # License along with the GNU C Library; if not, see
- # <http://www.gnu.org/licenses/>.
- set -e
- common_objpfx=$1; shift
- test_via_rtld_prefix=$1; shift
- test_program_prefix=$1; shift
- test_wrapper_env=$1; shift
- logfile=$common_objpfx/posix/globtest.out
- #CMP=cmp
- CMP="diff -u"
- # We have to make the paths `common_objpfx' absolute.
- case "$common_objpfx" in
- .*)
- common_objpfx="`pwd`/$common_objpfx"
- ;;
- *)
- ;;
- esac
- # Since we use `sort' we must make sure to use the same locale everywhere.
- LC_ALL=C
- export LC_ALL
- # Create the arena
- testdir=${common_objpfx}posix/globtest-dir
- testout=${common_objpfx}posix/globtest-out
- rm -rf $testdir $testout
- mkdir $testdir
- trap 'chmod 777 $testdir/noread; rm -fr $testdir $testout' 1 2 3 15
- echo 1 > $testdir/file1
- echo 2 > $testdir/file2
- echo 3 > $testdir/-file3
- echo 4 > $testdir/~file4
- echo 5 > $testdir/.file5
- echo 6 > $testdir/'*file6'
- echo 7 > $testdir/'{file7,}'
- echo 8 > $testdir/'\{file8\}'
- echo 9 > $testdir/'\{file9\,file9b\}'
- echo 9 > $testdir/'\file9b\' #'
- echo a > $testdir/'filea,'
- echo a > $testdir/'fileb}c'
- mkdir $testdir/dir1
- mkdir $testdir/dir2
- test -d $testdir/noread || mkdir $testdir/noread
- chmod a-r $testdir/noread
- echo 1_1 > $testdir/dir1/file1_1
- echo 1_2 > $testdir/dir1/file1_2
- ln -fs dir1 $testdir/link1
- # Run some tests.
- result=0
- rm -f $logfile
- # Normal test
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `*file6'
- `-file3'
- `\file9b\'
- `\{file8\}'
- `\{file9\,file9b\}'
- `dir1'
- `dir2'
- `file1'
- `file2'
- `filea,'
- `fileb}c'
- `link1'
- `noread'
- `{file7,}'
- `~file4'
- EOF
- if test $failed -ne 0; then
- echo "Normal test failed" >> $logfile
- result=1
- fi
- # Don't let glob sort it
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -s "$testdir" "*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `*file6'
- `-file3'
- `\file9b\'
- `\{file8\}'
- `\{file9\,file9b\}'
- `dir1'
- `dir2'
- `file1'
- `file2'
- `filea,'
- `fileb}c'
- `link1'
- `noread'
- `{file7,}'
- `~file4'
- EOF
- if test $failed -ne 0; then
- echo "No sort test failed" >> $logfile
- result=1
- fi
- # Mark directories
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -m "$testdir" "*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `*file6'
- `-file3'
- `\file9b\'
- `\{file8\}'
- `\{file9\,file9b\}'
- `dir1/'
- `dir2/'
- `file1'
- `file2'
- `filea,'
- `fileb}c'
- `link1/'
- `noread/'
- `{file7,}'
- `~file4'
- EOF
- if test $failed -ne 0; then
- echo "Mark directories test failed" >> $logfile
- result=1
- fi
- # Find files starting with .
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -p "$testdir" "*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `*file6'
- `-file3'
- `.'
- `..'
- `.file5'
- `\file9b\'
- `\{file8\}'
- `\{file9\,file9b\}'
- `dir1'
- `dir2'
- `file1'
- `file2'
- `filea,'
- `fileb}c'
- `link1'
- `noread'
- `{file7,}'
- `~file4'
- EOF
- if test $failed -ne 0; then
- echo "Leading period test failed" >> $logfile
- result=1
- fi
- # Test braces
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -b "$testdir" "file{1,2}" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `file1'
- `file2'
- EOF
- if test $failed -ne 0; then
- echo "Braces test failed" >> $logfile
- result=1
- fi
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -b "$testdir" "{file{1,2},-file3}" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `-file3'
- `file1'
- `file2'
- EOF
- if test $failed -ne 0; then
- echo "Braces test 2 failed" >> $logfile
- result=1
- fi
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -b "$testdir" "{" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "Braces test 3 failed" >> $logfile
- result=1
- fi
- # Test NOCHECK
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -c "$testdir" "abc" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `abc'
- EOF
- if test $failed -ne 0; then
- echo "No check test failed" >> $logfile
- result=1
- fi
- # Test NOMAGIC without magic characters
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -g "$testdir" "abc" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `abc'
- EOF
- if test $failed -ne 0; then
- echo "No magic test failed" >> $logfile
- result=1
- fi
- # Test NOMAGIC with magic characters
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -g "$testdir" "abc*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "No magic w/ magic chars test failed" >> $logfile
- result=1
- fi
- # Test NOMAGIC for subdirs
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -g "$testdir" "*/does-not-exist" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "No magic in subdir test failed" >> $logfile
- result=1
- fi
- # Test subdirs correctly
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "*/*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `dir1/file1_1'
- `dir1/file1_2'
- `link1/file1_1'
- `link1/file1_2'
- EOF
- if test $failed -ne 0; then
- echo "Subdirs test failed" >> $logfile
- result=1
- fi
- # Test subdirs for invalid names
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "*/1" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "Invalid subdir test failed" >> $logfile
- result=1
- fi
- # Test subdirs with wildcard
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "*/*1_1" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `dir1/file1_1'
- `link1/file1_1'
- EOF
- if test $failed -ne 0; then
- echo "Wildcard subdir test failed" >> $logfile
- result=1
- fi
- # Test subdirs with ?
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "*/*?_?" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `dir1/file1_1'
- `dir1/file1_2'
- `link1/file1_1'
- `link1/file1_2'
- EOF
- if test $failed -ne 0; then
- echo "Wildcard2 subdir test failed" >> $logfile
- result=1
- fi
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "*/file1_1" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `dir1/file1_1'
- `link1/file1_1'
- EOF
- if test $failed -ne 0; then
- echo "Wildcard3 subdir test failed" >> $logfile
- result=1
- fi
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "*-/*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "Wildcard4 subdir test failed" >> $logfile
- result=1
- fi
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "*-" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "Wildcard5 subdir test failed" >> $logfile
- result=1
- fi
- # Test subdirs with ?
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "*/*?_?" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `dir1/file1_1'
- `dir1/file1_2'
- `link1/file1_1'
- `link1/file1_2'
- EOF
- if test $failed -ne 0; then
- echo "Wildcard6 subdir test failed" >> $logfile
- result=1
- fi
- # Test subdirs with [ .. ]
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "*/file1_[12]" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `dir1/file1_1'
- `dir1/file1_2'
- `link1/file1_1'
- `link1/file1_2'
- EOF
- if test $failed -ne 0; then
- echo "Brackets test failed" >> $logfile
- result=1
- fi
- # Test ']' inside bracket expression
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "dir1/file1_[]12]" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `dir1/file1_1'
- `dir1/file1_2'
- EOF
- if test $failed -ne 0; then
- echo "Brackets2 test failed" >> $logfile
- result=1
- fi
- # Test tilde expansion
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -q -t "$testdir" "~" |
- sort >$testout
- echo ~ | $CMP - $testout >> $logfile || failed=1
- if test $failed -ne 0; then
- if test -d ~; then
- echo "Tilde test failed" >> $logfile
- result=1
- else
- echo "Tilde test could not be run" >> $logfile
- fi
- fi
- # Test tilde expansion with trailing slash
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -q -t "$testdir" "~/" |
- sort > $testout
- # Some shell incorrectly(?) convert ~/ into // if ~ expands to /.
- if test ~/ = //; then
- echo / | $CMP - $testout >> $logfile || failed=1
- else
- echo ~/ | $CMP - $testout >> $logfile || failed=1
- fi
- if test $failed -ne 0; then
- if test -d ~/; then
- echo "Tilde2 test failed" >> $logfile
- result=1
- else
- echo "Tilde2 test could not be run" >> $logfile
- fi
- fi
- # Test tilde expansion with username
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -q -t "$testdir" "~"$USER |
- sort > $testout
- eval echo ~$USER | $CMP - $testout >> $logfile || failed=1
- if test $failed -ne 0; then
- if eval test -d ~$USER; then
- echo "Tilde3 test failed" >> $logfile
- result=1
- else
- echo "Tilde3 test could not be run" >> $logfile
- fi
- fi
- # Tilde expansion shouldn't match a file
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -T "$testdir" "~file4" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "Tilde4 test failed" >> $logfile
- result=1
- fi
- # Matching \** should only find *file6
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "\**" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `*file6'
- EOF
- if test $failed -ne 0; then
- echo "Star test failed" >> $logfile
- result=1
- fi
- # ... unless NOESCAPE is used, in which case it should entries with a
- # leading \.
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -e "$testdir" "\**" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `\file9b\'
- `\{file8\}'
- `\{file9\,file9b\}'
- EOF
- if test $failed -ne 0; then
- echo "Star2 test failed" >> $logfile
- result=1
- fi
- # Matching \*file6 should find *file6
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "\*file6" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `*file6'
- EOF
- if test $failed -ne 0; then
- echo "Star3 test failed" >> $logfile
- result=1
- fi
- # GLOB_BRACE alone
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -b "$testdir" '\{file7\,\}' |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `{file7,}'
- EOF
- if test $failed -ne 0; then
- echo "Brace4 test failed" >> $logfile
- result=1
- fi
- # GLOB_BRACE and GLOB_NOESCAPE
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -b -e "$testdir" '\{file9\,file9b\}' |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `\file9b\'
- EOF
- if test $failed -ne 0; then
- echo "Brace5 test failed" >> $logfile
- result=1
- fi
- # Escaped comma
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -b "$testdir" '{filea\,}' |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `filea,'
- EOF
- if test $failed -ne 0; then
- echo "Brace6 test failed" >> $logfile
- result=1
- fi
- # Escaped closing brace
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -b "$testdir" '{fileb\}c}' |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `fileb}c'
- EOF
- if test $failed -ne 0; then
- echo "Brace7 test failed" >> $logfile
- result=1
- fi
- # Try a recursive failed search
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -e "$testdir" "a*/*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "Star4 test failed" >> $logfile
- result=1
- fi
- # ... with GLOB_ERR
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -E "$testdir" "a*/*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "Star5 test failed" >> $logfile
- result=1
- fi
- # Try a recursive search in unreadable directory
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "noread/*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "Star6 test failed" >> $logfile
- result=1
- fi
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "noread*/*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_NOMATCH
- EOF
- if test $failed -ne 0; then
- echo "Star6 test failed" >> $logfile
- result=1
- fi
- # The following tests will fail if run as root.
- user=`id -un 2> /dev/null`
- if test -z "$user"; then
- uid="$USER"
- fi
- if test "$user" != root; then
- # ... with GLOB_ERR
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -E "$testdir" "noread/*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_ABORTED
- EOF
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -E "$testdir" "noread*/*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- GLOB_ABORTED
- EOF
- if test $failed -ne 0; then
- echo "GLOB_ERR test failed" >> $logfile
- result=1
- fi
- fi # not run as root
- # Try multiple patterns (GLOB_APPEND)
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" "file1" "*/*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `dir1/file1_1'
- `dir1/file1_2'
- `file1'
- `link1/file1_1'
- `link1/file1_2'
- EOF
- if test $failed -ne 0; then
- echo "GLOB_APPEND test failed" >> $logfile
- result=1
- fi
- # Try multiple patterns (GLOB_APPEND) with offset (GLOB_DOOFFS)
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -o "$testdir" "file1" "*/*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `abc'
- `dir1/file1_1'
- `dir1/file1_2'
- `file1'
- `link1/file1_1'
- `link1/file1_2'
- EOF
- if test $failed -ne 0; then
- echo "GLOB_APPEND2 test failed" >> $logfile
- result=1
- fi
- # Test NOCHECK with non-existing file in subdir.
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -c "$testdir" "*/blahblah" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `*/blahblah'
- EOF
- if test $failed -ne 0; then
- echo "No check2 test failed" >> $logfile
- result=1
- fi
- # Test [[:punct:]] not matching leading period.
- failed=0
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -c "$testdir" "[[:punct:]]*" |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `*file6'
- `-file3'
- `\file9b\'
- `\{file8\}'
- `\{file9\,file9b\}'
- `{file7,}'
- `~file4'
- EOF
- if test $failed -ne 0; then
- echo "Punct test failed" >> $logfile
- result=1
- fi
- mkdir $testdir/'dir3*'
- echo 1 > $testdir/'dir3*'/file1
- mkdir $testdir/'dir4[a'
- echo 2 > $testdir/'dir4[a'/file1
- echo 3 > $testdir/'dir4[a'/file2
- mkdir $testdir/'dir5[ab]'
- echo 4 > $testdir/'dir5[ab]'/file1
- echo 5 > $testdir/'dir5[ab]'/file2
- mkdir $testdir/dir6
- echo 6 > $testdir/dir6/'file1[a'
- echo 7 > $testdir/dir6/'file1[ab]'
- failed=0
- v=`${test_program_prefix} \
- ${common_objpfx}posix/globtest "$testdir" 'dir3\*/file2'`
- test "$v" != 'GLOB_NOMATCH' && echo "$v" >> $logfile && failed=1
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -c "$testdir" \
- 'dir3\*/file1' 'dir3\*/file2' 'dir1/file\1_1' 'dir1/file\1_9' \
- 'dir2\/' 'nondir\/' 'dir4[a/fil*1' 'di*r4[a/file2' 'dir5[ab]/file[12]' \
- 'dir6/fil*[a' 'dir*6/file1[a' 'dir6/fi*l[ab]' 'dir*6/file1[ab]' \
- 'dir6/file1[[.a.]*' |
- sort > $testout
- cat <<"EOF" | $CMP - $testout >> $logfile || failed=1
- `dir*6/file1[ab]'
- `dir1/file1_1'
- `dir1/file\1_9'
- `dir2/'
- `dir3*/file1'
- `dir3\*/file2'
- `dir4[a/file1'
- `dir4[a/file2'
- `dir5[ab]/file[12]'
- `dir6/fi*l[ab]'
- `dir6/file1[a'
- `dir6/file1[a'
- `dir6/file1[a'
- `dir6/file1[ab]'
- `nondir\/'
- EOF
- ${test_wrapper_env} \
- HOME="$testdir" \
- ${test_via_rtld_prefix} \
- ${common_objpfx}posix/globtest -ct "$testdir" \
- '~/dir1/file1_1' '~/dir1/file1_9' '~/dir3\*/file1' '~/dir3\*/file2' \
- '~\/dir1/file1_2' |
- sort > $testout
- cat <<EOF | $CMP - $testout >> $logfile || failed=1
- \`$testdir/dir1/file1_1'
- \`$testdir/dir1/file1_2'
- \`$testdir/dir3*/file1'
- \`~/dir1/file1_9'
- \`~/dir3\\*/file2'
- EOF
- if eval test -d ~"$USER"/; then
- user=`echo "$USER" | sed -n -e 's/^\([^\\]\)\([^\\][^\\]*\)$/~\1\\\\\2/p'`
- if test -n "$user"; then
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -ctq "$testdir" "$user/" |
- sort > $testout
- eval echo ~$USER/ | $CMP - $testout >> $logfile || failed=1
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -ctq "$testdir" "$user\\/" |
- sort > $testout
- eval echo ~$USER/ | $CMP - $testout >> $logfile || failed=1
- ${test_program_prefix} \
- ${common_objpfx}posix/globtest -ctq "$testdir" "$user" |
- sort > $testout
- eval echo ~$USER | $CMP - $testout >> $logfile || failed=1
- fi
- fi
- if test $failed -ne 0; then
- echo "Escape tests failed" >> $logfile
- result=1
- fi
- if test $result -eq 0; then
- chmod 777 $testdir/noread
- rm -fr $testdir $testout
- echo "All OK." > $logfile
- fi
- exit $result
- # Preserve executable bits for this shell script.
- Local Variables:
- eval:(defun frobme () (set-file-modes buffer-file-name file-mode))
- eval:(make-local-variable 'file-mode)
- eval:(setq file-mode (file-modes (buffer-file-name)))
- eval:(make-local-variable 'after-save-hook)
- eval:(add-hook 'after-save-hook 'frobme)
- End: