skalibs

commit 483de1edb380b33c6adf56c8f47a701a0e268f07
parent 77c1c85dbf79927f48b4dc09cd4cdbadcfee84af
Author: Laurent Bercot <ska-skaware@skarnet.org>
Date:   Mon, 27 Nov 2017 13:42:43 +0000

 Add access_at, because MacOS

Diffstat:
M
package/deps.mak
 | 
1
+
M
src/include/skalibs/unix-transactional.h
 | 
1
+
A
src/libunixonacid/access_at.c
 | 
53
+++++++++++++++++++++++++++++++++++++++++++++++++++++

3 files changed, 55 insertions(+), 0 deletions(-)
diff --git a/package/deps.mak b/package/deps.mak
@@ -687,6 +687,7 @@ src/libstddjb/xpathexec_fromenv.o src/libstddjb/xpathexec_fromenv.lo: src/libstd
 src/libstddjb/xpathexec_r.o src/libstddjb/xpathexec_r.lo: src/libstddjb/xpathexec_r.c src/include/skalibs/djbunix.h src/include/skalibs/strerr2.h
 src/libstddjb/xpathexec_r_name.o src/libstddjb/xpathexec_r_name.lo: src/libstddjb/xpathexec_r_name.c src/include/skalibs/djbunix.h src/include/skalibs/strerr2.h
 src/libstddjb/xpathexec_run.o src/libstddjb/xpathexec_run.lo: src/libstddjb/xpathexec_run.c src/include/skalibs/djbunix.h src/include/skalibs/strerr2.h
+src/libunixonacid/access_at.o src/libunixonacid/access_at.lo: src/libunixonacid/access_at.c src/include/skalibs/djbunix.h src/include/skalibs/nonposix.h src/include/skalibs/sysdeps.h src/include/skalibs/unix-transactional.h
 src/libunixonacid/atomic_rm_rf.o src/libunixonacid/atomic_rm_rf.lo: src/libunixonacid/atomic_rm_rf.c src/include/skalibs/skamisc.h src/include/skalibs/unix-transactional.h
 src/libunixonacid/atomic_rm_rf_tmp.o src/libunixonacid/atomic_rm_rf_tmp.lo: src/libunixonacid/atomic_rm_rf_tmp.c src/include/skalibs/djbunix.h src/include/skalibs/random.h src/include/skalibs/stralloc.h src/include/skalibs/unix-transactional.h
 src/libunixonacid/bufalloc_timed_flush.o src/libunixonacid/bufalloc_timed_flush.lo: src/libunixonacid/bufalloc_timed_flush.c src/include/skalibs/bufalloc.h src/include/skalibs/functypes.h src/include/skalibs/unix-timed.h
diff --git a/src/include/skalibs/unix-transactional.h b/src/include/skalibs/unix-transactional.h
@@ -13,6 +13,7 @@
 
 extern int open2_at (int, char const *, int) ;
 extern int open3_at (int, char const *, int, unsigned int) ;
+extern int access_at (int, char const *, int, unsigned int) ;
 
 extern int opengetlnclose (char const *, stralloc *, int) ;
 
diff --git a/src/libunixonacid/access_at.c b/src/libunixonacid/access_at.c
@@ -0,0 +1,53 @@
+/* ISC license. */
+
+#include <skalibs/sysdeps.h>
+
+#ifdef SKALIBS_HASOPENAT
+
+#ifndef _ATFILE_SOURCE
+#define _ATFILE_SOURCE
+#endif
+
+#include <skalibs/nonposix.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <skalibs/unix-transactional.h>
+
+int access_at (int dirfd, char const *file, int amode, unsigned int flag)
+{
+  return faccessat(dirfd, file, amode, flag ? AT_EACCESS : 0) ;
+}
+
+#else
+
+#include <errno.h>
+#include <unistd.h>
+#include <skalibs/djbunix.h>
+#include <skalibs/unix-transactional.h>
+
+int access_at (int dirfd, char const *file, int amode, unsigned int flag)
+{
+  int fdhere ;
+  if (getuid() != geteuid() || getgid() != getegid())
+    return (errno = ENOSYS, -1) ;
+  (void)flag ;
+  fdhere = open_read(".") ;
+  if (fdhere < 0) return -1 ;
+  if (fd_chdir(dirfd) < 0)
+  {
+    fd_close(fdhere) ;
+    return -1 ;
+  }
+  if (access(file, amode) < 0)
+  {
+    int e = errno ;
+    fd_chdir(fdhere) ;
+    fd_close(fdhere) ;
+    return (errno = e, -1) ;
+  }
+  fd_chdir(fdhere) ;
+  fd_close(fdhere) ;
+  return 0 ;
+}
+
+#endif