summaryrefslogtreecommitdiff
path: root/Build/source/texk/kpathsea/kpseaccess.test
blob: ffe2b56f312f7344a69a25a3b149ccd3919adbd8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
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