diff options
Diffstat (limited to 'Build/source/texk/kpathsea/kpseaccess.test')
-rwxr-xr-x | Build/source/texk/kpathsea/kpseaccess.test | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/Build/source/texk/kpathsea/kpseaccess.test b/Build/source/texk/kpathsea/kpseaccess.test new file mode 100755 index 00000000000..ffe2b56f312 --- /dev/null +++ b/Build/source/texk/kpathsea/kpseaccess.test @@ -0,0 +1,27 @@ +#! /bin/sh + +# Copyright (C) 2010 Peter Breitenlohner <tex-live@tug.org> +# You may freely use, modify and/or distribute this file. + +./kpseaccess '' nonesuch && exit 1 +./kpseaccess - nonesuch && exit 1 +./kpseaccess r nonesuch && exit 1 +./kpseaccess w nonesuch && exit 1 +./kpseaccess x nonesuch && exit 1 + +./kpseaccess '' access.o || exit 1 +./kpseaccess - access.o || exit 1 +./kpseaccess rw access.o || exit 1 +./kpseaccess x access.o && exit 1 + +./kpseaccess rwx kpseaccess || exit 1 + +./kpseaccess r $srcdir/access.c || exit 1 +./kpseaccess x $srcdir/access.c && exit 1 + +if ./kpseaccess w $srcdir/access.c; then + echo 'file "$srcdir/access.c" is writable' +else + echo 'file "$srcdir/access.c" is not writable' +fi + |