12e7ff0cd17f90209cfb979c7a7096e2767e052a
[musl] / src / stat / fchmodat.c
1 #include <sys/stat.h>
2 #include <fcntl.h>
3 #include <errno.h>
4 #include "syscall.h"
5
6 void __procfdname(char *, unsigned);
7
8 int fchmodat(int fd, const char *path, mode_t mode, int flag)
9 {
10         if (!flag) return syscall(SYS_fchmodat, fd, path, mode, flag);
11
12         if (flag != AT_SYMLINK_NOFOLLOW)
13                 return __syscall_ret(-EINVAL);
14
15         struct stat st;
16         int ret, fd2;
17         char proc[15+3*sizeof(int)];
18
19         if ((ret = __syscall(SYS_fstatat, fd, path, &st, flag)))
20                 return __syscall_ret(ret);
21         if (S_ISLNK(st.st_mode))
22                 return __syscall_ret(-EOPNOTSUPP);
23
24         if ((fd2 = __syscall(SYS_openat, fd, path, O_RDONLY|O_PATH|O_NOFOLLOW|O_NOCTTY)) < 0) {
25                 if (fd2 == -ELOOP)
26                         return __syscall_ret(-EOPNOTSUPP);
27                 return __syscall_ret(fd2);
28         }
29
30         __procfdname(proc, fd2);
31         if (!(ret = __syscall(SYS_stat, proc, &st)) && !S_ISLNK(st.st_mode))
32                 ret = __syscall(SYS_chmod, proc, mode);
33
34         __syscall(SYS_close, fd2);
35         return __syscall_ret(ret);
36 }