1 | /* |
1 | /* |
2 | * libeio implementation |
2 | * libeio implementation |
3 | * |
3 | * |
4 | * Copyright (c) 2007,2008,2009,2010,2011,2012,2013 Marc Alexander Lehmann <libeio@schmorp.de> |
4 | * Copyright (c) 2007,2008,2009,2010,2011,2012,2013,2016 Marc Alexander Lehmann <libeio@schmorp.de> |
5 | * All rights reserved. |
5 | * All rights reserved. |
6 | * |
6 | * |
7 | * Redistribution and use in source and binary forms, with or without modifica- |
7 | * Redistribution and use in source and binary forms, with or without modifica- |
8 | * tion, are permitted provided that the following conditions are met: |
8 | * tion, are permitted provided that the following conditions are met: |
9 | * |
9 | * |
… | |
… | |
42 | #endif |
42 | #endif |
43 | |
43 | |
44 | #include "eio.h" |
44 | #include "eio.h" |
45 | #include "ecb.h" |
45 | #include "ecb.h" |
46 | |
46 | |
47 | #ifdef EIO_STACKSIZE |
|
|
48 | # define X_STACKSIZE EIO_STACKSIZE |
|
|
49 | #endif |
|
|
50 | #include "xthread.h" |
|
|
51 | |
|
|
52 | #include <errno.h> |
47 | #include <errno.h> |
53 | #include <stddef.h> |
48 | #include <stddef.h> |
54 | #include <stdlib.h> |
49 | #include <stdlib.h> |
55 | #include <string.h> |
50 | #include <string.h> |
56 | #include <errno.h> |
51 | #include <errno.h> |
… | |
… | |
122 | #define chmod(path,mode) _chmod (path, mode) |
117 | #define chmod(path,mode) _chmod (path, mode) |
123 | #define dup(fd) _dup (fd) |
118 | #define dup(fd) _dup (fd) |
124 | #define dup2(fd1,fd2) _dup2 (fd1, fd2) |
119 | #define dup2(fd1,fd2) _dup2 (fd1, fd2) |
125 | #define pipe(fds) _pipe (fds, 4096, O_BINARY) |
120 | #define pipe(fds) _pipe (fds, 4096, O_BINARY) |
126 | |
121 | |
|
|
122 | #define fcntl(fd,cmd,arg) EIO_ENOSYS () |
|
|
123 | #define ioctl(fd,cmd,arg) EIO_ENOSYS () |
127 | #define fchmod(fd,mode) EIO_ENOSYS () |
124 | #define fchmod(fd,mode) EIO_ENOSYS () |
128 | #define chown(path,uid,gid) EIO_ENOSYS () |
125 | #define chown(path,uid,gid) EIO_ENOSYS () |
129 | #define fchown(fd,uid,gid) EIO_ENOSYS () |
126 | #define fchown(fd,uid,gid) EIO_ENOSYS () |
130 | #define truncate(path,offs) EIO_ENOSYS () /* far-miss: SetEndOfFile */ |
127 | #define truncate(path,offs) EIO_ENOSYS () /* far-miss: SetEndOfFile */ |
131 | #define ftruncate(fd,offs) EIO_ENOSYS () /* near-miss: SetEndOfFile */ |
128 | #define ftruncate(fd,offs) EIO_ENOSYS () /* near-miss: SetEndOfFile */ |
… | |
… | |
204 | /* we could even stat and see if it exists */ |
201 | /* we could even stat and see if it exists */ |
205 | static int |
202 | static int |
206 | symlink (const char *old, const char *neu) |
203 | symlink (const char *old, const char *neu) |
207 | { |
204 | { |
208 | #if WINVER >= 0x0600 |
205 | #if WINVER >= 0x0600 |
|
|
206 | int flags; |
|
|
207 | |
|
|
208 | /* This tries out all combinations of SYMBOLIC_LINK_FLAG_DIRECTORY |
|
|
209 | * and SYMBOLIC_LINK_FLAG_ALLOW_UNPRIVILEGED_CREATE, |
|
|
210 | * with directory first. |
|
|
211 | */ |
|
|
212 | for (flags = 3; flags >= 0; --flags) |
209 | if (CreateSymbolicLink (neu, old, 1)) |
213 | if (CreateSymbolicLink (neu, old, flags)) |
210 | return 0; |
214 | return 0; |
211 | |
|
|
212 | if (CreateSymbolicLink (neu, old, 0)) |
|
|
213 | return 0; |
|
|
214 | #endif |
215 | #endif |
215 | |
216 | |
216 | return EIO_ERRNO (ENOENT, -1); |
217 | return EIO_ERRNO (ENOENT, -1); |
217 | } |
218 | } |
218 | |
219 | |
… | |
… | |
281 | # include <utime.h> |
282 | # include <utime.h> |
282 | #endif |
283 | #endif |
283 | |
284 | |
284 | #if HAVE_SYS_SYSCALL_H |
285 | #if HAVE_SYS_SYSCALL_H |
285 | # include <sys/syscall.h> |
286 | # include <sys/syscall.h> |
286 | #endif |
|
|
287 | |
|
|
288 | #if HAVE_SYS_PRCTL_H |
|
|
289 | # include <sys/prctl.h> |
|
|
290 | #endif |
287 | #endif |
291 | |
288 | |
292 | #if HAVE_SENDFILE |
289 | #if HAVE_SENDFILE |
293 | # if __linux |
290 | # if __linux |
294 | # include <sys/sendfile.h> |
291 | # include <sys/sendfile.h> |
… | |
… | |
319 | # define NAME_MAX 4096 |
316 | # define NAME_MAX 4096 |
320 | #endif |
317 | #endif |
321 | |
318 | |
322 | /* used for readlink etc. */ |
319 | /* used for readlink etc. */ |
323 | #ifndef PATH_MAX |
320 | #ifndef PATH_MAX |
324 | # define PATH_MAX 4096 |
321 | # define PATH_MAX 0 |
325 | #endif |
322 | #endif |
|
|
323 | |
|
|
324 | #ifndef EIO_PATH_MIN |
|
|
325 | # define EIO_PATH_MIN 8160 |
|
|
326 | #endif |
|
|
327 | |
|
|
328 | #define EIO_PATH_MAX (PATH_MAX <= EIO_PATH_MIN ? EIO_PATH_MIN : PATH_MAX) |
326 | |
329 | |
327 | /* buffer size for various temporary buffers */ |
330 | /* buffer size for various temporary buffers */ |
328 | #define EIO_BUFSIZE 65536 |
331 | #define EIO_BUFSIZE 65536 |
329 | |
332 | |
330 | #define dBUF \ |
333 | #define dBUF \ |
… | |
… | |
977 | |
980 | |
978 | errno = ENOENT; |
981 | errno = ENOENT; |
979 | if (!*rel) |
982 | if (!*rel) |
980 | return -1; |
983 | return -1; |
981 | |
984 | |
982 | res = etp_tmpbuf_get (tmpbuf, PATH_MAX * 3); |
985 | res = etp_tmpbuf_get (tmpbuf, EIO_PATH_MAX * 3); |
983 | #ifdef _WIN32 |
986 | #ifdef _WIN32 |
984 | if (_access (rel, 4) != 0) |
987 | if (_access (rel, 4) != 0) |
985 | return -1; |
988 | return -1; |
986 | |
989 | |
987 | symlinks = GetFullPathName (rel, PATH_MAX * 3, res, 0); |
990 | symlinks = GetFullPathName (rel, EIO_PATH_MAX * 3, res, 0); |
988 | |
991 | |
989 | errno = ENAMETOOLONG; |
992 | errno = ENAMETOOLONG; |
990 | if (symlinks >= PATH_MAX * 3) |
993 | if (symlinks >= EIO_PATH_MAX * 3) |
991 | return -1; |
994 | return -1; |
992 | |
995 | |
993 | errno = EIO; |
996 | errno = EIO; |
994 | if (symlinks <= 0) |
997 | if (symlinks <= 0) |
995 | return -1; |
998 | return -1; |
996 | |
999 | |
997 | return symlinks; |
1000 | return symlinks; |
998 | |
1001 | |
999 | #else |
1002 | #else |
1000 | tmp1 = res + PATH_MAX; |
1003 | tmp1 = res + EIO_PATH_MAX; |
1001 | tmp2 = tmp1 + PATH_MAX; |
1004 | tmp2 = tmp1 + EIO_PATH_MAX; |
1002 | |
1005 | |
1003 | #if 0 /* disabled, the musl way to do things is just too racy */ |
1006 | #if 0 /* disabled, the musl way to do things is just too racy */ |
1004 | #if __linux && defined(O_NONBLOCK) && defined(O_NOATIME) |
1007 | #if __linux && defined(O_NONBLOCK) && defined(O_NOATIME) |
1005 | /* on linux we may be able to ask the kernel */ |
1008 | /* on linux we may be able to ask the kernel */ |
1006 | { |
1009 | { |
1007 | int fd = open (rel, O_RDONLY | O_NONBLOCK | O_NOCTTY | O_NOATIME); |
1010 | int fd = open (rel, O_RDONLY | O_NONBLOCK | O_NOCTTY | O_NOATIME); |
1008 | |
1011 | |
1009 | if (fd >= 0) |
1012 | if (fd >= 0) |
1010 | { |
1013 | { |
1011 | sprintf (tmp1, "/proc/self/fd/%d", fd); |
1014 | sprintf (tmp1, "/proc/self/fd/%d", fd); |
1012 | req->result = readlink (tmp1, res, PATH_MAX); |
1015 | req->result = readlink (tmp1, res, EIO_PATH_MAX); |
1013 | /* here we should probably stat the open file and the disk file, to make sure they still match */ |
1016 | /* here we should probably stat the open file and the disk file, to make sure they still match */ |
1014 | close (fd); |
1017 | close (fd); |
1015 | |
1018 | |
1016 | if (req->result > 0) |
1019 | if (req->result > 0) |
1017 | goto done; |
1020 | goto done; |
… | |
… | |
1030 | if (wd == EIO_INVALID_WD) |
1033 | if (wd == EIO_INVALID_WD) |
1031 | return -1; |
1034 | return -1; |
1032 | |
1035 | |
1033 | if (wd == EIO_CWD) |
1036 | if (wd == EIO_CWD) |
1034 | { |
1037 | { |
1035 | if (!getcwd (res, PATH_MAX)) |
1038 | if (!getcwd (res, EIO_PATH_MAX)) |
1036 | return -1; |
1039 | return -1; |
1037 | |
1040 | |
1038 | len = strlen (res); |
1041 | len = strlen (res); |
1039 | } |
1042 | } |
1040 | else |
1043 | else |
… | |
… | |
1087 | |
1090 | |
1088 | /* zero-terminate, for readlink */ |
1091 | /* zero-terminate, for readlink */ |
1089 | res [len + 1] = 0; |
1092 | res [len + 1] = 0; |
1090 | |
1093 | |
1091 | /* now check if it's a symlink */ |
1094 | /* now check if it's a symlink */ |
1092 | linklen = readlink (tmpbuf->ptr, tmp1, PATH_MAX); |
1095 | linklen = readlink (tmpbuf->ptr, tmp1, EIO_PATH_MAX); |
1093 | |
1096 | |
1094 | if (linklen < 0) |
1097 | if (linklen < 0) |
1095 | { |
1098 | { |
1096 | if (errno != EINVAL) |
1099 | if (errno != EINVAL) |
1097 | return -1; |
1100 | return -1; |
… | |
… | |
1103 | { |
1106 | { |
1104 | /* yay, it was a symlink - build new path in tmp2 */ |
1107 | /* yay, it was a symlink - build new path in tmp2 */ |
1105 | int rellen = strlen (rel); |
1108 | int rellen = strlen (rel); |
1106 | |
1109 | |
1107 | errno = ENAMETOOLONG; |
1110 | errno = ENAMETOOLONG; |
1108 | if (linklen + 1 + rellen >= PATH_MAX) |
1111 | if (linklen + 1 + rellen >= EIO_PATH_MAX) /* also catch linklen >= EIO_PATH_MAX */ |
1109 | return -1; |
1112 | return -1; |
1110 | |
1113 | |
1111 | errno = ELOOP; |
1114 | errno = ELOOP; |
1112 | if (!--symlinks) |
1115 | if (!--symlinks) |
1113 | return -1; |
1116 | return -1; |
… | |
… | |
1816 | : read (req->int1, req->ptr2, req->size); break; |
1819 | : read (req->int1, req->ptr2, req->size); break; |
1817 | case EIO_WRITE: req->result = req->offs >= 0 |
1820 | case EIO_WRITE: req->result = req->offs >= 0 |
1818 | ? pwrite (req->int1, req->ptr2, req->size, req->offs) |
1821 | ? pwrite (req->int1, req->ptr2, req->size, req->offs) |
1819 | : write (req->int1, req->ptr2, req->size); break; |
1822 | : write (req->int1, req->ptr2, req->size); break; |
1820 | |
1823 | |
|
|
1824 | case EIO_FCNTL: req->result = fcntl (req->int1, (int) req->int2, req->ptr2); break; |
|
|
1825 | case EIO_IOCTL: req->result = ioctl (req->int1, (unsigned long)req->int2, req->ptr2); break; |
|
|
1826 | |
1821 | case EIO_READAHEAD: req->result = readahead (req->int1, req->offs, req->size); break; |
1827 | case EIO_READAHEAD: req->result = readahead (req->int1, req->offs, req->size); break; |
1822 | case EIO_SENDFILE: req->result = eio__sendfile (req->int1, req->int2, req->offs, req->size); break; |
1828 | case EIO_SENDFILE: req->result = eio__sendfile (req->int1, req->int2, req->offs, req->size); break; |
1823 | |
1829 | |
1824 | #if HAVE_AT |
1830 | #if HAVE_AT |
1825 | |
1831 | |
… | |
… | |
1843 | ? rename (req->wd->str, req->ptr2) |
1849 | ? rename (req->wd->str, req->ptr2) |
1844 | : renameat (dirfd, req->ptr1, WD2FD ((eio_wd)req->int3), req->ptr2); break; |
1850 | : renameat (dirfd, req->ptr1, WD2FD ((eio_wd)req->int3), req->ptr2); break; |
1845 | case EIO_LINK: req->result = linkat (dirfd, req->ptr1, WD2FD ((eio_wd)req->int3), req->ptr2, 0); break; |
1851 | case EIO_LINK: req->result = linkat (dirfd, req->ptr1, WD2FD ((eio_wd)req->int3), req->ptr2, 0); break; |
1846 | case EIO_SYMLINK: req->result = symlinkat (req->ptr1, dirfd, req->ptr2); break; |
1852 | case EIO_SYMLINK: req->result = symlinkat (req->ptr1, dirfd, req->ptr2); break; |
1847 | case EIO_MKNOD: req->result = mknodat (dirfd, req->ptr1, (mode_t)req->int2, (dev_t)req->offs); break; |
1853 | case EIO_MKNOD: req->result = mknodat (dirfd, req->ptr1, (mode_t)req->int2, (dev_t)req->offs); break; |
1848 | case EIO_READLINK: ALLOC (PATH_MAX); |
|
|
1849 | req->result = readlinkat (dirfd, req->ptr1, req->ptr2, PATH_MAX); break; |
|
|
1850 | case EIO_STATVFS: ALLOC (sizeof (EIO_STRUCT_STATVFS)); |
1854 | case EIO_STATVFS: ALLOC (sizeof (EIO_STRUCT_STATVFS)); |
1851 | req->result = eio__statvfsat (dirfd, req->ptr1, (EIO_STRUCT_STATVFS *)req->ptr2); break; |
1855 | req->result = eio__statvfsat (dirfd, req->ptr1, (EIO_STRUCT_STATVFS *)req->ptr2); break; |
|
|
1856 | case EIO_READLINK: ALLOC (EIO_PATH_MAX); |
|
|
1857 | req->result = readlinkat (dirfd, req->ptr1, req->ptr2, EIO_PATH_MAX); |
|
|
1858 | if (req->result == EIO_PATH_MAX) |
|
|
1859 | { |
|
|
1860 | req->result = -1; |
|
|
1861 | errno = ENAMETOOLONG; |
|
|
1862 | } |
|
|
1863 | break; |
1852 | case EIO_UTIME: |
1864 | case EIO_UTIME: |
1853 | case EIO_FUTIME: |
1865 | case EIO_FUTIME: |
1854 | { |
1866 | { |
1855 | struct timespec ts[2]; |
1867 | struct timespec ts[2]; |
1856 | struct timespec *times; |
1868 | struct timespec *times; |
… | |
… | |
1889 | case EIO_MKDIR: req->result = mkdir (path , (mode_t)req->int2); break; |
1901 | case EIO_MKDIR: req->result = mkdir (path , (mode_t)req->int2); break; |
1890 | case EIO_RENAME: req->result = rename (path , req->ptr2); break; |
1902 | case EIO_RENAME: req->result = rename (path , req->ptr2); break; |
1891 | case EIO_LINK: req->result = link (path , req->ptr2); break; |
1903 | case EIO_LINK: req->result = link (path , req->ptr2); break; |
1892 | case EIO_SYMLINK: req->result = symlink (path , req->ptr2); break; |
1904 | case EIO_SYMLINK: req->result = symlink (path , req->ptr2); break; |
1893 | case EIO_MKNOD: req->result = mknod (path , (mode_t)req->int2, (dev_t)req->offs); break; |
1905 | case EIO_MKNOD: req->result = mknod (path , (mode_t)req->int2, (dev_t)req->offs); break; |
1894 | case EIO_READLINK: ALLOC (PATH_MAX); |
|
|
1895 | req->result = readlink (path, req->ptr2, PATH_MAX); break; |
|
|
1896 | case EIO_STATVFS: ALLOC (sizeof (EIO_STRUCT_STATVFS)); |
1906 | case EIO_STATVFS: ALLOC (sizeof (EIO_STRUCT_STATVFS)); |
1897 | req->result = statvfs (path , (EIO_STRUCT_STATVFS *)req->ptr2); break; |
1907 | req->result = statvfs (path , (EIO_STRUCT_STATVFS *)req->ptr2); break; |
|
|
1908 | case EIO_READLINK: ALLOC (EIO_PATH_MAX); |
|
|
1909 | req->result = readlink (path, req->ptr2, EIO_PATH_MAX); |
|
|
1910 | if (req->result == EIO_PATH_MAX) |
|
|
1911 | { |
|
|
1912 | req->result = -1; |
|
|
1913 | errno = ENAMETOOLONG; |
|
|
1914 | } |
|
|
1915 | break; |
1898 | |
1916 | |
1899 | case EIO_UTIME: |
1917 | case EIO_UTIME: |
1900 | case EIO_FUTIME: |
1918 | case EIO_FUTIME: |
1901 | { |
1919 | { |
1902 | struct timeval tv[2]; |
1920 | struct timeval tv[2]; |
… | |
… | |
2085 | eio_req *eio_write (int fd, void *buf, size_t length, off_t offset, int pri, eio_cb cb, void *data) |
2103 | eio_req *eio_write (int fd, void *buf, size_t length, off_t offset, int pri, eio_cb cb, void *data) |
2086 | { |
2104 | { |
2087 | REQ (EIO_WRITE); req->int1 = fd; req->offs = offset; req->size = length; req->ptr2 = buf; SEND; |
2105 | REQ (EIO_WRITE); req->int1 = fd; req->offs = offset; req->size = length; req->ptr2 = buf; SEND; |
2088 | } |
2106 | } |
2089 | |
2107 | |
|
|
2108 | eio_req *eio_fcntl (int fd, int cmd, void *arg, int pri, eio_cb cb, void *data) |
|
|
2109 | { |
|
|
2110 | REQ (EIO_IOCTL); req->int1 = fd; req->int2 = cmd; req->ptr2 = arg; SEND; |
|
|
2111 | } |
|
|
2112 | |
|
|
2113 | eio_req *eio_ioctl (int fd, unsigned long request, void *buf, int pri, eio_cb cb, void *data) |
|
|
2114 | { |
|
|
2115 | REQ (EIO_IOCTL); req->int1 = fd; req->int2 = request; req->ptr2 = buf; SEND; |
|
|
2116 | } |
|
|
2117 | |
2090 | eio_req *eio_fstat (int fd, int pri, eio_cb cb, void *data) |
2118 | eio_req *eio_fstat (int fd, int pri, eio_cb cb, void *data) |
2091 | { |
2119 | { |
2092 | REQ (EIO_FSTAT); req->int1 = fd; SEND; |
2120 | REQ (EIO_FSTAT); req->int1 = fd; SEND; |
2093 | } |
2121 | } |
2094 | |
2122 | |