Mercurial > hg > octave-shane > gnulib-hg

annotate lib/euidaccess.c @ 11977:4f551695bc4c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
euidaccess: fix compilation error * lib/euidaccess.c (includes): Add <fcntl.h>, for AT_EACCESS. Signed-off-by: Eric Blake <ebb9@byu.net>
author Eric Blake <ebb9@byu.net>
date Tue, 08 Sep 2009 13:06:02 -0600
parents 660d7f74a5e8
children e8d2c6fc33ad
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
1 /* euidaccess -- check if effective user id can access file
4531
67c56a27d86c Merge euidaccess etc. from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4422
diff changeset
2
11944
660d7f74a5e8 euidaccess: prefer POSIX over non-standard implementation
Eric Blake <ebb9@byu.net>
parents: 10662
diff changeset
3 Copyright (C) 1990, 1991, 1995, 1998, 2000, 2003, 2004, 2005, 2006,
660d7f74a5e8 euidaccess: prefer POSIX over non-standard implementation
Eric Blake <ebb9@byu.net>
parents: 10662
diff changeset
4 2008, 2009 Free Software Foundation, Inc.
4531
67c56a27d86c Merge euidaccess etc. from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4422
diff changeset
5
4422
d82316ffe803 Switch from LGPL to GPL.
Paul Eggert <eggert@cs.ucla.edu>
parents: 2094
diff changeset
6 This file is part of the GNU C Library.
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
7
9309
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 7581
diff changeset
8 This program is free software: you can redistribute it and/or modify
4422
d82316ffe803 Switch from LGPL to GPL.
Paul Eggert <eggert@cs.ucla.edu>
parents: 2094
diff changeset
9 it under the terms of the GNU General Public License as published by
9309
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 7581
diff changeset
10 the Free Software Foundation; either version 3 of the License, or
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 7581
diff changeset
11 (at your option) any later version.
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
12
4422
d82316ffe803 Switch from LGPL to GPL.
Paul Eggert <eggert@cs.ucla.edu>
parents: 2094
diff changeset
13 This program is distributed in the hope that it will be useful,
d82316ffe803 Switch from LGPL to GPL.
Paul Eggert <eggert@cs.ucla.edu>
parents: 2094
diff changeset
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
d82316ffe803 Switch from LGPL to GPL.
Paul Eggert <eggert@cs.ucla.edu>
parents: 2094
diff changeset
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
d82316ffe803 Switch from LGPL to GPL.
Paul Eggert <eggert@cs.ucla.edu>
parents: 2094
diff changeset
16 GNU General Public License for more details.
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
17
9309
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 7581
diff changeset
18 You should have received a copy of the GNU General Public License
bbbbbf4cd1c5 Change copyright notice from GPLv2+ to GPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 7581
diff changeset
19 along with this program. If not, see <http://www.gnu.org/licenses/>. */
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
20
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
21 /* Written by David MacKenzie and Torbjorn Granlund.
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
22 Adapted for GNU C library by Roland McGrath. */
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
23
7302
8a1a9361108c * _fpending.c: Include <config.h> unconditionally, since we no
Paul Eggert <eggert@cs.ucla.edu>
parents: 6275
diff changeset
24 #ifndef _LIBC
615
1f485b09b153 (euidaccess) [!S_IROTH]: Define.
Jim Meyering <jim@meyering.net>
parents: 509
diff changeset
25 # include <config.h>
4531
67c56a27d86c Merge euidaccess etc. from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4422
diff changeset
26 #endif
67c56a27d86c Merge euidaccess etc. from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4422
diff changeset
27
11977
4f551695bc4c euidaccess: fix compilation error
Eric Blake <ebb9@byu.net>
parents: 11944
diff changeset
28 #include <fcntl.h>
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
29 #include <sys/types.h>
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
30 #include <sys/stat.h>
6275
fd0ccce602e4 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 6259
diff changeset
31 #include <unistd.h>
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
32
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
33 #if HAVE_LIBGEN_H
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
34 # include <libgen.h>
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
35 #endif
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
36
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
37 #include <errno.h>
2094
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
38 #ifndef __set_errno
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
39 # define __set_errno(val) errno = (val)
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
40 #endif
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
41
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
42 #if defined EACCES && !defined EACCESS
615
1f485b09b153 (euidaccess) [!S_IROTH]: Define.
Jim Meyering <jim@meyering.net>
parents: 509
diff changeset
43 # define EACCESS EACCES
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
44 #endif
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
45
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
46 #ifndef F_OK
615
1f485b09b153 (euidaccess) [!S_IROTH]: Define.
Jim Meyering <jim@meyering.net>
parents: 509
diff changeset
47 # define F_OK 0
1f485b09b153 (euidaccess) [!S_IROTH]: Define.
Jim Meyering <jim@meyering.net>
parents: 509
diff changeset
48 # define X_OK 1
1f485b09b153 (euidaccess) [!S_IROTH]: Define.
Jim Meyering <jim@meyering.net>
parents: 509
diff changeset
49 # define W_OK 2
1f485b09b153 (euidaccess) [!S_IROTH]: Define.
Jim Meyering <jim@meyering.net>
parents: 509
diff changeset
50 # define R_OK 4
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
51 #endif
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
52
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
53
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
54 #ifdef _LIBC
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
55
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
56 # define access __access
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
57 # define getuid __getuid
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
58 # define getgid __getgid
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
59 # define geteuid __geteuid
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
60 # define getegid __getegid
615
1f485b09b153 (euidaccess) [!S_IROTH]: Define.
Jim Meyering <jim@meyering.net>
parents: 509
diff changeset
61 # define group_member __group_member
2094
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
62 # define euidaccess __euidaccess
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
63 # undef stat
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
64 # define stat stat64
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
65
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
66 #else
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
67
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
68 # include "group-member.h"
2094
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
69
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
70 #endif
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
71
5907
c47674a83a78 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
72 /* Return 0 if the user has permission of type MODE on FILE;
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
73 otherwise, return -1 and set `errno'.
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
74 Like access, except that it uses the effective user and group
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
75 id's instead of the real ones, and it does not always check for read-only
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
76 file system, text busy, etc. */
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
77
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
78 int
5907
c47674a83a78 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
79 euidaccess (const char *file, int mode)
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
80 {
11944
660d7f74a5e8 euidaccess: prefer POSIX over non-standard implementation
Eric Blake <ebb9@byu.net>
parents: 10662
diff changeset
81 #if HAVE_FACCESSAT
660d7f74a5e8 euidaccess: prefer POSIX over non-standard implementation
Eric Blake <ebb9@byu.net>
parents: 10662
diff changeset
82 return faccessat (AT_FDCWD, file, mode, AT_EACCESS);
660d7f74a5e8 euidaccess: prefer POSIX over non-standard implementation
Eric Blake <ebb9@byu.net>
parents: 10662
diff changeset
83 #elif defined EFF_ONLY_OK
5907
c47674a83a78 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
84 return access (file, mode | EFF_ONLY_OK);
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
85 #elif defined ACC_SELF
5907
c47674a83a78 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
86 return accessx (file, mode, ACC_SELF);
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
87 #elif HAVE_EACCESS
5907
c47674a83a78 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
88 return eaccess (file, mode);
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
89 #else
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
90
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
91 uid_t uid = getuid ();
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
92 gid_t gid = getgid ();
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
93 uid_t euid = geteuid ();
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
94 gid_t egid = getegid ();
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
95 struct stat stats;
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
96
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
97 # if HAVE_DECL_SETREGID && PREFER_NONREENTRANT_EUIDACCESS
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
98
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
99 /* Define PREFER_NONREENTRANT_EUIDACCESS if you prefer euidaccess to
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
100 return the correct result even if this would make it
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
101 nonreentrant. Define this only if your entire application is
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
102 safe even if the uid or gid might temporarily change. If your
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
103 application uses signal handlers or threads it is probably not
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
104 safe. */
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
105
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
106 if (mode == F_OK)
5907
c47674a83a78 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
107 return stat (file, &stats);
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
108 else
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
109 {
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
110 int result;
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
111 int saved_errno;
5421
8df21945af17 Remove trailing blanks.
Jim Meyering <jim@meyering.net>
parents: 5157
diff changeset
112
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
113 if (uid != euid)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
114 setreuid (euid, uid);
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
115 if (gid != egid)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
116 setregid (egid, gid);
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
117
5907
c47674a83a78 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
118 result = access (file, mode);
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
119 saved_errno = errno;
5421
8df21945af17 Remove trailing blanks.
Jim Meyering <jim@meyering.net>
parents: 5157
diff changeset
120
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
121 /* Restore them. */
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
122 if (uid != euid)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
123 setreuid (uid, euid);
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
124 if (gid != egid)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
125 setregid (gid, egid);
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
126
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
127 errno = saved_errno;
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
128 return result;
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
129 }
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
130
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
131 # else
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
132
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
133 /* The following code assumes the traditional Unix model, and is not
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
134 correct on systems that have ACLs or the like. However, it's
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
135 better than nothing, and it is reentrant. */
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
136
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
137 unsigned int granted;
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
138 if (uid == euid && gid == egid)
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
139 /* If we are not set-uid or set-gid, access does the same. */
5907
c47674a83a78 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
140 return access (file, mode);
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
141
5907
c47674a83a78 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
142 if (stat (file, &stats) != 0)
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
143 return -1;
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
144
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
145 /* The super-user can read and write any file, and execute any file
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
146 that anyone can execute. */
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
147 if (euid == 0 && ((mode & X_OK) == 0
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
148 || (stats.st_mode & (S_IXUSR | S_IXGRP | S_IXOTH))))
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
149 return 0;
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
150
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
151 /* Convert the mode to traditional form, clearing any bogus bits. */
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
152 if (R_OK == 4 && W_OK == 2 && X_OK == 1 && F_OK == 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
153 mode &= 7;
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
154 else
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
155 mode = ((mode & R_OK ? 4 : 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
156 + (mode & W_OK ? 2 : 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
157 + (mode & X_OK ? 1 : 0));
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
158
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
159 if (mode == 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
160 return 0; /* The file exists. */
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
161
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
162 /* Convert the file's permission bits to traditional form. */
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
163 if (S_IRUSR == (4 << 6) && S_IWUSR == (2 << 6) && S_IXUSR == (1 << 6)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
164 && S_IRGRP == (4 << 3) && S_IWGRP == (2 << 3) && S_IXGRP == (1 << 3)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
165 && S_IROTH == (4 << 0) && S_IWOTH == (2 << 0) && S_IXOTH == (1 << 0))
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
166 granted = stats.st_mode;
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
167 else
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
168 granted = ((stats.st_mode & S_IRUSR ? 4 << 6 : 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
169 + (stats.st_mode & S_IWUSR ? 2 << 6 : 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
170 + (stats.st_mode & S_IXUSR ? 1 << 6 : 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
171 + (stats.st_mode & S_IRGRP ? 4 << 3 : 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
172 + (stats.st_mode & S_IWGRP ? 2 << 3 : 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
173 + (stats.st_mode & S_IXGRP ? 1 << 3 : 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
174 + (stats.st_mode & S_IROTH ? 4 << 0 : 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
175 + (stats.st_mode & S_IWOTH ? 2 << 0 : 0)
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
176 + (stats.st_mode & S_IXOTH ? 1 << 0 : 0));
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
177
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
178 if (euid == stats.st_uid)
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
179 granted >>= 6;
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
180 else if (egid == stats.st_gid || group_member (stats.st_gid))
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
181 granted >>= 3;
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
182
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
183 if ((mode & ~granted) == 0)
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
184 return 0;
2094
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
185 __set_errno (EACCESS);
509
f3adb0434ae9 New version from glibc.
Jim Meyering <jim@meyering.net>
parents: 507
diff changeset
186 return -1;
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
187
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
188 # endif
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
189 #endif
341
df2001ec0cd4 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
190 }
2094
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
191 #undef euidaccess
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
192 #ifdef weak_alias
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
193 weak_alias (__euidaccess, euidaccess)
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
194 #endif
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
195
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
196 #ifdef TEST
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
197 # include <error.h>
2094
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
198 # include <stdio.h>
5157
62fa339919f4 [HAVE_LIBGEN_H]: Include <libgen.h>, for
Paul Eggert <eggert@cs.ucla.edu>
parents: 4637
diff changeset
199 # include <stdlib.h>
2094
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
200
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
201 char *program_name;
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
202
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
203 int
4637
f736e2167837 (main): Define with a prototype.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4531
diff changeset
204 main (int argc, char **argv)
2094
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
205 {
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
206 char *file;
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
207 int mode;
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
208 int err;
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
209
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
210 program_name = argv[0];
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
211 if (argc < 3)
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
212 abort ();
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
213 file = argv[1];
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
214 mode = atoi (argv[2]);
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
215
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
216 err = euidaccess (file, mode);
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
217 printf ("%d\n", err);
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
218 if (err != 0)
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
219 error (0, errno, "%s", file);
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
220 exit (0);
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
221 }
92c4b5c4b148 Sync with the GNU C library.
Jim Meyering <jim@meyering.net>
parents: 1557
diff changeset
222 #endif