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,2017,2018 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 | |
… | |
… | |
230 | #define D_NAME(entp) entp.cFileName |
231 | #define D_NAME(entp) entp.cFileName |
231 | #define D_TYPE(entp) (entp.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY ? DT_DIR : DT_REG) |
232 | #define D_TYPE(entp) (entp.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY ? DT_DIR : DT_REG) |
232 | |
233 | |
233 | #else |
234 | #else |
234 | |
235 | |
|
|
236 | #include <sys/ioctl.h> |
235 | #include <sys/time.h> |
237 | #include <sys/time.h> |
236 | #include <sys/select.h> |
238 | #include <sys/select.h> |
237 | #include <unistd.h> |
239 | #include <unistd.h> |
238 | #include <signal.h> |
240 | #include <signal.h> |
239 | #include <dirent.h> |
241 | #include <dirent.h> |
… | |
… | |
281 | # include <utime.h> |
283 | # include <utime.h> |
282 | #endif |
284 | #endif |
283 | |
285 | |
284 | #if HAVE_SYS_SYSCALL_H |
286 | #if HAVE_SYS_SYSCALL_H |
285 | # include <sys/syscall.h> |
287 | # include <sys/syscall.h> |
286 | #endif |
|
|
287 | |
|
|
288 | #if HAVE_SYS_PRCTL_H |
|
|
289 | # include <sys/prctl.h> |
|
|
290 | #endif |
288 | #endif |
291 | |
289 | |
292 | #if HAVE_SENDFILE |
290 | #if HAVE_SENDFILE |
293 | # if __linux |
291 | # if __linux |
294 | # include <sys/sendfile.h> |
292 | # include <sys/sendfile.h> |
… | |
… | |
302 | # else |
300 | # else |
303 | # error sendfile support requested but not available |
301 | # error sendfile support requested but not available |
304 | # endif |
302 | # endif |
305 | #endif |
303 | #endif |
306 | |
304 | |
|
|
305 | #if HAVE_RENAMEAT2 |
|
|
306 | # include <sys/syscall.h> |
|
|
307 | # include <linux/fs.h> |
|
|
308 | #endif |
|
|
309 | |
307 | #ifndef D_TYPE |
310 | #ifndef D_TYPE |
308 | # define D_TYPE(de) 0 |
311 | # define D_TYPE(de) 0 |
309 | #endif |
312 | #endif |
310 | #ifndef D_INO |
313 | #ifndef D_INO |
311 | # define D_INO(de) 0 |
314 | # define D_INO(de) 0 |
… | |
… | |
319 | # define NAME_MAX 4096 |
322 | # define NAME_MAX 4096 |
320 | #endif |
323 | #endif |
321 | |
324 | |
322 | /* used for readlink etc. */ |
325 | /* used for readlink etc. */ |
323 | #ifndef PATH_MAX |
326 | #ifndef PATH_MAX |
324 | # define PATH_MAX 4096 |
327 | # define PATH_MAX 0 |
325 | #endif |
328 | #endif |
|
|
329 | |
|
|
330 | #ifndef O_CLOEXEC |
|
|
331 | #define O_CLOEXEC 0 |
|
|
332 | #endif |
|
|
333 | |
|
|
334 | #ifndef O_NONBLOCK |
|
|
335 | #define O_NONBLOCK 0 |
|
|
336 | #endif |
|
|
337 | |
|
|
338 | #ifndef O_SEARCH |
|
|
339 | #define O_SEARCH O_RDONLY |
|
|
340 | #endif |
|
|
341 | |
|
|
342 | #ifndef O_DIRECTORY |
|
|
343 | #define O_DIRECTORY 0 |
|
|
344 | #endif |
|
|
345 | |
|
|
346 | #ifndef EIO_PATH_MIN |
|
|
347 | # define EIO_PATH_MIN 8160 |
|
|
348 | #endif |
|
|
349 | |
|
|
350 | #define EIO_PATH_MAX (PATH_MAX <= EIO_PATH_MIN ? EIO_PATH_MIN : PATH_MAX) |
326 | |
351 | |
327 | /* buffer size for various temporary buffers */ |
352 | /* buffer size for various temporary buffers */ |
328 | #define EIO_BUFSIZE 65536 |
353 | #define EIO_BUFSIZE 65536 |
329 | |
354 | |
330 | #define dBUF \ |
355 | #define dBUF \ |
… | |
… | |
341 | struct etp_tmpbuf; |
366 | struct etp_tmpbuf; |
342 | |
367 | |
343 | #if _POSIX_VERSION >= 200809L |
368 | #if _POSIX_VERSION >= 200809L |
344 | #define HAVE_AT 1 |
369 | #define HAVE_AT 1 |
345 | #define WD2FD(wd) ((wd) ? (wd)->fd : AT_FDCWD) |
370 | #define WD2FD(wd) ((wd) ? (wd)->fd : AT_FDCWD) |
346 | #ifndef O_SEARCH |
|
|
347 | #define O_SEARCH O_RDONLY |
|
|
348 | #endif |
|
|
349 | #else |
371 | #else |
350 | #define HAVE_AT 0 |
372 | #define HAVE_AT 0 |
351 | static const char *wd_expand (struct etp_tmpbuf *tmpbuf, eio_wd wd, const char *path); |
373 | static const char *wd_expand (struct etp_tmpbuf *tmpbuf, eio_wd wd, const char *path); |
352 | #endif |
374 | #endif |
353 | |
375 | |
… | |
… | |
543 | return etp_poll (EIO_POOL); |
565 | return etp_poll (EIO_POOL); |
544 | } |
566 | } |
545 | |
567 | |
546 | /*****************************************************************************/ |
568 | /*****************************************************************************/ |
547 | /* work around various missing functions */ |
569 | /* work around various missing functions */ |
|
|
570 | |
|
|
571 | #if HAVE_POSIX_CLOSE && !__linux |
|
|
572 | # define eio__close(fd) posix_close (fd, 0) |
|
|
573 | #else |
|
|
574 | # define eio__close(fd) close (fd) |
|
|
575 | #endif |
|
|
576 | |
|
|
577 | /* close() without disturbing errno */ |
|
|
578 | static void |
|
|
579 | silent_close (int fd) |
|
|
580 | { |
|
|
581 | int saved_errno = errno; |
|
|
582 | eio__close (fd); |
|
|
583 | errno = saved_errno; |
|
|
584 | } |
548 | |
585 | |
549 | #ifndef HAVE_UTIMES |
586 | #ifndef HAVE_UTIMES |
550 | |
587 | |
551 | # undef utimes |
588 | # undef utimes |
552 | # define utimes(path,times) eio__utimes (path, times) |
589 | # define utimes(path,times) eio__utimes (path, times) |
… | |
… | |
865 | #if __GLIBC__ == 2 && __GLIBC_MINOR__ <= 7 |
902 | #if __GLIBC__ == 2 && __GLIBC_MINOR__ <= 7 |
866 | extern int mallopt (int, int); |
903 | extern int mallopt (int, int); |
867 | mallopt (-6, 238); /* http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=473812 */ |
904 | mallopt (-6, 238); /* http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=473812 */ |
868 | #endif |
905 | #endif |
869 | |
906 | |
|
|
907 | #ifndef MCL_ONFAULT |
|
|
908 | if (flags & EIO_MCL_ONFAULT) |
|
|
909 | return EIO_ERRNO (EINVAL, -1); |
|
|
910 | #define MCL_ONFAULT 4 |
|
|
911 | #endif |
|
|
912 | |
870 | if (EIO_MCL_CURRENT != MCL_CURRENT |
913 | if (EIO_MCL_CURRENT != MCL_CURRENT |
871 | || EIO_MCL_FUTURE != MCL_FUTURE) |
914 | || EIO_MCL_FUTURE != MCL_FUTURE |
|
|
915 | || EIO_MCL_ONFAULT != MCL_ONFAULT) |
872 | { |
916 | { |
873 | flags = 0 |
917 | flags = 0 |
874 | | (flags & EIO_MCL_CURRENT ? MCL_CURRENT : 0) |
918 | | (flags & EIO_MCL_CURRENT ? MCL_CURRENT : 0) |
875 | | (flags & EIO_MCL_FUTURE ? MCL_FUTURE : 0); |
919 | | (flags & EIO_MCL_FUTURE ? MCL_FUTURE : 0) |
|
|
920 | | (flags & EIO_MCL_ONFAULT ? MCL_ONFAULT : 0) |
|
|
921 | ; |
876 | } |
922 | } |
877 | |
923 | |
878 | return mlockall (flags); |
924 | return mlockall (flags); |
879 | } |
925 | } |
880 | #endif |
926 | #endif |
… | |
… | |
931 | intptr_t end = addr + len; |
977 | intptr_t end = addr + len; |
932 | intptr_t page = eio_pagesize (); |
978 | intptr_t page = eio_pagesize (); |
933 | |
979 | |
934 | if (addr < end) |
980 | if (addr < end) |
935 | if (flags & EIO_MT_MODIFY) /* modify */ |
981 | if (flags & EIO_MT_MODIFY) /* modify */ |
936 | do { *((volatile sig_atomic_t *)addr) |= 0; } while ((addr += page) < len && !EIO_CANCELLED (req)); |
982 | do { *((volatile sig_atomic_t *)addr) |= 0; } while ((addr += page) < end && !EIO_CANCELLED (req)); |
937 | else |
983 | else |
938 | do { *((volatile sig_atomic_t *)addr) ; } while ((addr += page) < len && !EIO_CANCELLED (req)); |
984 | do { *((volatile sig_atomic_t *)addr) ; } while ((addr += page) < end && !EIO_CANCELLED (req)); |
939 | } |
985 | } |
940 | |
986 | |
941 | return 0; |
987 | return 0; |
942 | } |
988 | } |
943 | |
989 | |
… | |
… | |
977 | |
1023 | |
978 | errno = ENOENT; |
1024 | errno = ENOENT; |
979 | if (!*rel) |
1025 | if (!*rel) |
980 | return -1; |
1026 | return -1; |
981 | |
1027 | |
982 | res = etp_tmpbuf_get (tmpbuf, PATH_MAX * 3); |
1028 | res = etp_tmpbuf_get (tmpbuf, EIO_PATH_MAX * 3); |
983 | #ifdef _WIN32 |
1029 | #ifdef _WIN32 |
984 | if (_access (rel, 4) != 0) |
1030 | if (_access (rel, 4) != 0) |
985 | return -1; |
1031 | return -1; |
986 | |
1032 | |
987 | symlinks = GetFullPathName (rel, PATH_MAX * 3, res, 0); |
1033 | symlinks = GetFullPathName (rel, EIO_PATH_MAX * 3, res, 0); |
988 | |
1034 | |
989 | errno = ENAMETOOLONG; |
1035 | errno = ENAMETOOLONG; |
990 | if (symlinks >= PATH_MAX * 3) |
1036 | if (symlinks >= EIO_PATH_MAX * 3) |
991 | return -1; |
1037 | return -1; |
992 | |
1038 | |
993 | errno = EIO; |
1039 | errno = EIO; |
994 | if (symlinks <= 0) |
1040 | if (symlinks <= 0) |
995 | return -1; |
1041 | return -1; |
996 | |
1042 | |
997 | return symlinks; |
1043 | return symlinks; |
998 | |
1044 | |
999 | #else |
1045 | #else |
1000 | tmp1 = res + PATH_MAX; |
1046 | tmp1 = res + EIO_PATH_MAX; |
1001 | tmp2 = tmp1 + PATH_MAX; |
1047 | tmp2 = tmp1 + EIO_PATH_MAX; |
1002 | |
1048 | |
1003 | #if 0 /* disabled, the musl way to do things is just too racy */ |
1049 | #if 0 /* disabled, the musl way to do things is just too racy */ |
1004 | #if __linux && defined(O_NONBLOCK) && defined(O_NOATIME) |
1050 | #if __linux && defined(O_NONBLOCK) && defined(O_NOATIME) |
1005 | /* on linux we may be able to ask the kernel */ |
1051 | /* on linux we may be able to ask the kernel */ |
1006 | { |
1052 | { |
1007 | int fd = open (rel, O_RDONLY | O_NONBLOCK | O_NOCTTY | O_NOATIME); |
1053 | int fd = open (rel, O_RDONLY | O_NONBLOCK | O_NOCTTY | O_NOATIME); |
1008 | |
1054 | |
1009 | if (fd >= 0) |
1055 | if (fd >= 0) |
1010 | { |
1056 | { |
1011 | sprintf (tmp1, "/proc/self/fd/%d", fd); |
1057 | sprintf (tmp1, "/proc/self/fd/%d", fd); |
1012 | req->result = readlink (tmp1, res, PATH_MAX); |
1058 | 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 */ |
1059 | /* here we should probably stat the open file and the disk file, to make sure they still match */ |
1014 | close (fd); |
1060 | eio__close (fd); |
1015 | |
1061 | |
1016 | if (req->result > 0) |
1062 | if (req->result > 0) |
1017 | goto done; |
1063 | goto done; |
1018 | } |
1064 | } |
1019 | else if (errno == ELOOP || errno == ENAMETOOLONG || errno == ENOENT || errno == ENOTDIR || errno == EIO) |
1065 | else if (errno == ELOOP || errno == ENAMETOOLONG || errno == ENOENT || errno == ENOTDIR || errno == EIO) |
… | |
… | |
1030 | if (wd == EIO_INVALID_WD) |
1076 | if (wd == EIO_INVALID_WD) |
1031 | return -1; |
1077 | return -1; |
1032 | |
1078 | |
1033 | if (wd == EIO_CWD) |
1079 | if (wd == EIO_CWD) |
1034 | { |
1080 | { |
1035 | if (!getcwd (res, PATH_MAX)) |
1081 | if (!getcwd (res, EIO_PATH_MAX)) |
1036 | return -1; |
1082 | return -1; |
1037 | |
1083 | |
1038 | len = strlen (res); |
1084 | len = strlen (res); |
1039 | } |
1085 | } |
1040 | else |
1086 | else |
… | |
… | |
1087 | |
1133 | |
1088 | /* zero-terminate, for readlink */ |
1134 | /* zero-terminate, for readlink */ |
1089 | res [len + 1] = 0; |
1135 | res [len + 1] = 0; |
1090 | |
1136 | |
1091 | /* now check if it's a symlink */ |
1137 | /* now check if it's a symlink */ |
1092 | linklen = readlink (tmpbuf->ptr, tmp1, PATH_MAX); |
1138 | linklen = readlink (tmpbuf->ptr, tmp1, EIO_PATH_MAX); |
1093 | |
1139 | |
1094 | if (linklen < 0) |
1140 | if (linklen < 0) |
1095 | { |
1141 | { |
1096 | if (errno != EINVAL) |
1142 | if (errno != EINVAL) |
1097 | return -1; |
1143 | return -1; |
… | |
… | |
1103 | { |
1149 | { |
1104 | /* yay, it was a symlink - build new path in tmp2 */ |
1150 | /* yay, it was a symlink - build new path in tmp2 */ |
1105 | int rellen = strlen (rel); |
1151 | int rellen = strlen (rel); |
1106 | |
1152 | |
1107 | errno = ENAMETOOLONG; |
1153 | errno = ENAMETOOLONG; |
1108 | if (linklen + 1 + rellen >= PATH_MAX) |
1154 | if (linklen + 1 + rellen >= EIO_PATH_MAX) /* also catch linklen >= EIO_PATH_MAX */ |
1109 | return -1; |
1155 | return -1; |
1110 | |
1156 | |
1111 | errno = ELOOP; |
1157 | errno = ELOOP; |
1112 | if (!--symlinks) |
1158 | if (!--symlinks) |
1113 | return -1; |
1159 | return -1; |
… | |
… | |
1367 | return; |
1413 | return; |
1368 | } |
1414 | } |
1369 | } |
1415 | } |
1370 | #else |
1416 | #else |
1371 | #if HAVE_AT |
1417 | #if HAVE_AT |
1372 | if (req->wd) |
|
|
1373 | { |
1418 | { |
1374 | int fd = openat (WD2FD (req->wd), req->ptr1, O_CLOEXEC | O_SEARCH | O_DIRECTORY); |
1419 | int fd = openat (WD2FD (req->wd), req->ptr1, O_CLOEXEC | O_SEARCH | O_DIRECTORY | O_NONBLOCK); |
1375 | |
1420 | |
1376 | if (fd < 0) |
1421 | if (fd < 0) |
|
|
1422 | return; |
|
|
1423 | |
|
|
1424 | dirp = fdopendir (fd); |
|
|
1425 | |
|
|
1426 | if (!dirp) |
|
|
1427 | { |
|
|
1428 | silent_close (fd); |
1377 | return; |
1429 | return; |
1378 | |
|
|
1379 | dirp = fdopendir (fd); |
|
|
1380 | |
|
|
1381 | if (!dirp) |
|
|
1382 | close (fd); |
|
|
1383 | } |
1430 | } |
1384 | else |
1431 | } |
1385 | dirp = opendir (req->ptr1); |
|
|
1386 | #else |
1432 | #else |
1387 | dirp = opendir (wd_expand (&self->tmpbuf, req->wd, req->ptr1)); |
1433 | dirp = opendir (wd_expand (&self->tmpbuf, req->wd, req->ptr1)); |
|
|
1434 | |
|
|
1435 | if (!dirp) |
|
|
1436 | return; |
1388 | #endif |
1437 | #endif |
1389 | |
|
|
1390 | if (!dirp) |
|
|
1391 | return; |
|
|
1392 | #endif |
1438 | #endif |
1393 | |
1439 | |
1394 | if (req->flags & EIO_FLAG_PTR1_FREE) |
1440 | if (req->flags & EIO_FLAG_PTR1_FREE) |
1395 | free (req->ptr1); |
1441 | free (req->ptr1); |
1396 | |
1442 | |
… | |
… | |
1631 | |
1677 | |
1632 | if (len < 0) |
1678 | if (len < 0) |
1633 | return EIO_INVALID_WD; |
1679 | return EIO_INVALID_WD; |
1634 | |
1680 | |
1635 | #if HAVE_AT |
1681 | #if HAVE_AT |
1636 | fd = openat (WD2FD (wd), path, O_CLOEXEC | O_SEARCH | O_DIRECTORY); |
1682 | fd = openat (WD2FD (wd), path, O_CLOEXEC | O_SEARCH | O_DIRECTORY | O_NONBLOCK); |
1637 | |
1683 | |
1638 | if (fd < 0) |
1684 | if (fd < 0) |
1639 | return EIO_INVALID_WD; |
1685 | return EIO_INVALID_WD; |
1640 | #endif |
1686 | #endif |
1641 | |
1687 | |
… | |
… | |
1653 | } |
1699 | } |
1654 | |
1700 | |
1655 | eio_wd |
1701 | eio_wd |
1656 | eio_wd_open_sync (eio_wd wd, const char *path) |
1702 | eio_wd_open_sync (eio_wd wd, const char *path) |
1657 | { |
1703 | { |
1658 | struct etp_tmpbuf tmpbuf = { }; |
1704 | struct etp_tmpbuf tmpbuf = { 0 }; |
1659 | wd = eio__wd_open_sync (&tmpbuf, wd, path); |
1705 | wd = eio__wd_open_sync (&tmpbuf, wd, path); |
1660 | free (tmpbuf.ptr); |
1706 | free (tmpbuf.ptr); |
1661 | |
1707 | |
1662 | return wd; |
1708 | return wd; |
1663 | } |
1709 | } |
… | |
… | |
1666 | eio_wd_close_sync (eio_wd wd) |
1712 | eio_wd_close_sync (eio_wd wd) |
1667 | { |
1713 | { |
1668 | if (wd != EIO_INVALID_WD && wd != EIO_CWD) |
1714 | if (wd != EIO_INVALID_WD && wd != EIO_CWD) |
1669 | { |
1715 | { |
1670 | #if HAVE_AT |
1716 | #if HAVE_AT |
1671 | close (wd->fd); |
1717 | eio__close (wd->fd); |
1672 | #endif |
1718 | #endif |
1673 | free (wd); |
1719 | free (wd); |
1674 | } |
1720 | } |
1675 | } |
1721 | } |
1676 | |
1722 | |
1677 | #if HAVE_AT |
1723 | #if HAVE_AT |
1678 | |
1724 | |
|
|
1725 | static int |
|
|
1726 | eio__renameat2 (int olddirfd, const char *oldpath, int newdirfd, const char *newpath, unsigned int flags) |
|
|
1727 | { |
|
|
1728 | #if HAVE_RENAMEAT2 |
|
|
1729 | return syscall (SYS_renameat2, olddirfd, oldpath, newdirfd, newpath, flags); |
|
|
1730 | #else |
|
|
1731 | if (flags) |
|
|
1732 | return EIO_ENOSYS (); |
|
|
1733 | |
|
|
1734 | return renameat (olddirfd, oldpath, newdirfd, newpath); |
|
|
1735 | #endif |
|
|
1736 | } |
|
|
1737 | |
1679 | /* they forgot these */ |
1738 | /* they forgot these */ |
1680 | |
1739 | |
1681 | static int |
1740 | static int |
1682 | eio__truncateat (int dirfd, const char *path, off_t length) |
1741 | eio__truncateat (int dirfd, const char *path, off_t length) |
1683 | { |
1742 | { |
1684 | int fd = openat (dirfd, path, O_WRONLY | O_CLOEXEC); |
1743 | int fd = openat (dirfd, path, O_WRONLY | O_CLOEXEC | O_NONBLOCK); |
1685 | int res; |
1744 | int res; |
1686 | |
1745 | |
1687 | if (fd < 0) |
1746 | if (fd < 0) |
1688 | return fd; |
1747 | return fd; |
1689 | |
1748 | |
1690 | res = ftruncate (fd, length); |
1749 | res = ftruncate (fd, length); |
1691 | close (fd); |
1750 | silent_close (fd); |
1692 | return res; |
1751 | return res; |
1693 | } |
1752 | } |
1694 | |
1753 | |
1695 | static int |
1754 | static int |
1696 | eio__statvfsat (int dirfd, const char *path, struct statvfs *buf) |
1755 | eio__statvfsat (int dirfd, const char *path, struct statvfs *buf) |
1697 | { |
1756 | { |
1698 | int fd = openat (dirfd, path, O_SEARCH | O_CLOEXEC); |
1757 | int fd = openat (dirfd, path, O_SEARCH | O_CLOEXEC | O_NONBLOCK); |
1699 | int res; |
1758 | int res; |
1700 | |
1759 | |
1701 | if (fd < 0) |
1760 | if (fd < 0) |
1702 | return fd; |
1761 | return fd; |
1703 | |
1762 | |
1704 | res = fstatvfs (fd, buf); |
1763 | res = fstatvfs (fd, buf); |
1705 | close (fd); |
1764 | silent_close (fd); |
1706 | return res; |
1765 | return res; |
1707 | |
|
|
1708 | } |
1766 | } |
1709 | |
1767 | |
1710 | #endif |
1768 | #endif |
1711 | |
1769 | |
1712 | /*****************************************************************************/ |
1770 | /*****************************************************************************/ |
… | |
… | |
1720 | req->ptr2 = malloc (len); \ |
1778 | req->ptr2 = malloc (len); \ |
1721 | if (!req->ptr2) \ |
1779 | if (!req->ptr2) \ |
1722 | { \ |
1780 | { \ |
1723 | errno = ENOMEM; \ |
1781 | errno = ENOMEM; \ |
1724 | req->result = -1; \ |
1782 | req->result = -1; \ |
1725 | break; \ |
1783 | goto alloc_fail; \ |
1726 | } \ |
1784 | } \ |
1727 | } |
1785 | } |
1728 | |
1786 | |
1729 | /*****************************************************************************/ |
1787 | /*****************************************************************************/ |
|
|
1788 | |
|
|
1789 | static void |
|
|
1790 | eio__slurp (int fd, eio_req *req) |
|
|
1791 | { |
|
|
1792 | req->result = fd; |
|
|
1793 | |
|
|
1794 | if (fd < 0) |
|
|
1795 | return; |
|
|
1796 | |
|
|
1797 | if (req->offs < 0 || !req->size) /* do we need the size? */ |
|
|
1798 | { |
|
|
1799 | off_t size = lseek (fd, 0, SEEK_END); |
|
|
1800 | |
|
|
1801 | if (req->offs < 0) |
|
|
1802 | req->offs += size; |
|
|
1803 | |
|
|
1804 | if (!req->size) |
|
|
1805 | req->size = size - req->offs; |
|
|
1806 | } |
|
|
1807 | |
|
|
1808 | ALLOC (req->size); |
|
|
1809 | req->result = pread (fd, req->ptr2, req->size, req->offs); |
|
|
1810 | |
|
|
1811 | silent_close (fd); |
|
|
1812 | |
|
|
1813 | alloc_fail: |
|
|
1814 | ; |
|
|
1815 | } |
1730 | |
1816 | |
1731 | int ecb_cold |
1817 | int ecb_cold |
1732 | eio_init (void (*want_poll)(void), void (*done_poll)(void)) |
1818 | eio_init (void (*want_poll)(void), void (*done_poll)(void)) |
1733 | { |
1819 | { |
1734 | eio_want_poll_cb = want_poll; |
1820 | eio_want_poll_cb = want_poll; |
… | |
… | |
1816 | : read (req->int1, req->ptr2, req->size); break; |
1902 | : read (req->int1, req->ptr2, req->size); break; |
1817 | case EIO_WRITE: req->result = req->offs >= 0 |
1903 | case EIO_WRITE: req->result = req->offs >= 0 |
1818 | ? pwrite (req->int1, req->ptr2, req->size, req->offs) |
1904 | ? pwrite (req->int1, req->ptr2, req->size, req->offs) |
1819 | : write (req->int1, req->ptr2, req->size); break; |
1905 | : write (req->int1, req->ptr2, req->size); break; |
1820 | |
1906 | |
|
|
1907 | case EIO_FCNTL: req->result = fcntl (req->int1, (int) req->int2, req->ptr2); break; |
|
|
1908 | case EIO_IOCTL: req->result = ioctl (req->int1, (unsigned long)req->int2, req->ptr2); break; |
|
|
1909 | |
1821 | case EIO_READAHEAD: req->result = readahead (req->int1, req->offs, req->size); break; |
1910 | 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; |
1911 | case EIO_SENDFILE: req->result = eio__sendfile (req->int1, req->int2, req->offs, req->size); break; |
1823 | |
1912 | |
1824 | #if HAVE_AT |
1913 | #if HAVE_AT |
1825 | |
1914 | |
… | |
… | |
1829 | req->result = fstatat (dirfd, req->ptr1, (EIO_STRUCT_STAT *)req->ptr2, AT_SYMLINK_NOFOLLOW); break; |
1918 | req->result = fstatat (dirfd, req->ptr1, (EIO_STRUCT_STAT *)req->ptr2, AT_SYMLINK_NOFOLLOW); break; |
1830 | case EIO_CHOWN: req->result = fchownat (dirfd, req->ptr1, req->int2, req->int3, 0); break; |
1919 | case EIO_CHOWN: req->result = fchownat (dirfd, req->ptr1, req->int2, req->int3, 0); break; |
1831 | case EIO_CHMOD: req->result = fchmodat (dirfd, req->ptr1, (mode_t)req->int2, 0); break; |
1920 | case EIO_CHMOD: req->result = fchmodat (dirfd, req->ptr1, (mode_t)req->int2, 0); break; |
1832 | case EIO_TRUNCATE: req->result = eio__truncateat (dirfd, req->ptr1, req->offs); break; |
1921 | case EIO_TRUNCATE: req->result = eio__truncateat (dirfd, req->ptr1, req->offs); break; |
1833 | case EIO_OPEN: req->result = openat (dirfd, req->ptr1, req->int1, (mode_t)req->int2); break; |
1922 | case EIO_OPEN: req->result = openat (dirfd, req->ptr1, req->int1, (mode_t)req->int2); break; |
|
|
1923 | case EIO_SLURP: eio__slurp ( openat (dirfd, req->ptr1, O_RDONLY | O_CLOEXEC), req); break; |
1834 | |
1924 | |
1835 | case EIO_UNLINK: req->result = unlinkat (dirfd, req->ptr1, 0); break; |
1925 | case EIO_UNLINK: req->result = unlinkat (dirfd, req->ptr1, 0); break; |
1836 | case EIO_RMDIR: /* complications arise because "." cannot be removed, so we might have to expand */ |
1926 | case EIO_RMDIR: /* complications arise because "." cannot be removed, so we might have to expand */ |
1837 | req->result = req->wd && SINGLEDOT (req->ptr1) |
1927 | req->result = req->wd && SINGLEDOT (req->ptr1) |
1838 | ? rmdir (req->wd->str) |
1928 | ? rmdir (req->wd->str) |
1839 | : unlinkat (dirfd, req->ptr1, AT_REMOVEDIR); break; |
1929 | : unlinkat (dirfd, req->ptr1, AT_REMOVEDIR); break; |
1840 | case EIO_MKDIR: req->result = mkdirat (dirfd, req->ptr1, (mode_t)req->int2); break; |
1930 | case EIO_MKDIR: req->result = mkdirat (dirfd, req->ptr1, (mode_t)req->int2); break; |
|
|
1931 | case EIO_RENAME: req->result = eio__renameat2 ( |
|
|
1932 | dirfd, |
1841 | case EIO_RENAME: /* complications arise because "." cannot be renamed, so we might have to expand */ |
1933 | /* complications arise because "." cannot be renamed, so we might have to expand */ |
1842 | req->result = req->wd && SINGLEDOT (req->ptr1) |
1934 | req->wd && SINGLEDOT (req->ptr1) ? req->wd->str : req->ptr1, |
1843 | ? rename (req->wd->str, req->ptr2) |
1935 | WD2FD ((eio_wd)req->int3), |
1844 | : renameat (dirfd, req->ptr1, WD2FD ((eio_wd)req->int3), req->ptr2); break; |
1936 | req->ptr2, |
|
|
1937 | req->int2 |
|
|
1938 | ); |
|
|
1939 | break; |
1845 | case EIO_LINK: req->result = linkat (dirfd, req->ptr1, WD2FD ((eio_wd)req->int3), req->ptr2, 0); break; |
1940 | 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; |
1941 | 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; |
1942 | 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)); |
1943 | case EIO_STATVFS: ALLOC (sizeof (EIO_STRUCT_STATVFS)); |
1851 | req->result = eio__statvfsat (dirfd, req->ptr1, (EIO_STRUCT_STATVFS *)req->ptr2); break; |
1944 | req->result = eio__statvfsat (dirfd, req->ptr1, (EIO_STRUCT_STATVFS *)req->ptr2); break; |
|
|
1945 | case EIO_READLINK: ALLOC (EIO_PATH_MAX); |
|
|
1946 | req->result = readlinkat (dirfd, req->ptr1, req->ptr2, EIO_PATH_MAX); |
|
|
1947 | if (req->result == EIO_PATH_MAX) |
|
|
1948 | { |
|
|
1949 | req->result = -1; |
|
|
1950 | errno = ENAMETOOLONG; |
|
|
1951 | } |
|
|
1952 | break; |
1852 | case EIO_UTIME: |
1953 | case EIO_UTIME: |
1853 | case EIO_FUTIME: |
1954 | case EIO_FUTIME: |
1854 | { |
1955 | { |
1855 | struct timespec ts[2]; |
1956 | struct timespec ts[2]; |
1856 | struct timespec *times; |
1957 | struct timespec *times; |
… | |
… | |
1881 | req->result = lstat (path , (EIO_STRUCT_STAT *)req->ptr2); break; |
1982 | req->result = lstat (path , (EIO_STRUCT_STAT *)req->ptr2); break; |
1882 | case EIO_CHOWN: req->result = chown (path , req->int2, req->int3); break; |
1983 | case EIO_CHOWN: req->result = chown (path , req->int2, req->int3); break; |
1883 | case EIO_CHMOD: req->result = chmod (path , (mode_t)req->int2); break; |
1984 | case EIO_CHMOD: req->result = chmod (path , (mode_t)req->int2); break; |
1884 | case EIO_TRUNCATE: req->result = truncate (path , req->offs); break; |
1985 | case EIO_TRUNCATE: req->result = truncate (path , req->offs); break; |
1885 | case EIO_OPEN: req->result = open (path , req->int1, (mode_t)req->int2); break; |
1986 | case EIO_OPEN: req->result = open (path , req->int1, (mode_t)req->int2); break; |
|
|
1987 | case EIO_SLURP: eio__slurp ( open (path , O_RDONLY | O_CLOEXEC), req); break; |
1886 | |
1988 | |
1887 | case EIO_UNLINK: req->result = unlink (path ); break; |
1989 | case EIO_UNLINK: req->result = unlink (path ); break; |
1888 | case EIO_RMDIR: req->result = rmdir (path ); break; |
1990 | case EIO_RMDIR: req->result = rmdir (path ); break; |
1889 | case EIO_MKDIR: req->result = mkdir (path , (mode_t)req->int2); break; |
1991 | case EIO_MKDIR: req->result = mkdir (path , (mode_t)req->int2); break; |
1890 | case EIO_RENAME: req->result = rename (path , req->ptr2); break; |
1992 | case EIO_RENAME: req->result = req->int2 ? EIO_ENOSYS () : rename (path, req->ptr2); break; |
1891 | case EIO_LINK: req->result = link (path , req->ptr2); break; |
1993 | case EIO_LINK: req->result = link (path , req->ptr2); break; |
1892 | case EIO_SYMLINK: req->result = symlink (path , req->ptr2); break; |
1994 | 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; |
1995 | 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)); |
1996 | case EIO_STATVFS: ALLOC (sizeof (EIO_STRUCT_STATVFS)); |
1897 | req->result = statvfs (path , (EIO_STRUCT_STATVFS *)req->ptr2); break; |
1997 | req->result = statvfs (path , (EIO_STRUCT_STATVFS *)req->ptr2); break; |
|
|
1998 | case EIO_READLINK: ALLOC (EIO_PATH_MAX); |
|
|
1999 | req->result = readlink (path, req->ptr2, EIO_PATH_MAX); |
|
|
2000 | if (req->result == EIO_PATH_MAX) |
|
|
2001 | { |
|
|
2002 | req->result = -1; |
|
|
2003 | errno = ENAMETOOLONG; |
|
|
2004 | } |
|
|
2005 | break; |
1898 | |
2006 | |
1899 | case EIO_UTIME: |
2007 | case EIO_UTIME: |
1900 | case EIO_FUTIME: |
2008 | case EIO_FUTIME: |
1901 | { |
2009 | { |
1902 | struct timeval tv[2]; |
2010 | struct timeval tv[2]; |
… | |
… | |
1937 | |
2045 | |
1938 | case EIO_FCHOWN: req->result = fchown (req->int1, req->int2, req->int3); break; |
2046 | case EIO_FCHOWN: req->result = fchown (req->int1, req->int2, req->int3); break; |
1939 | case EIO_FCHMOD: req->result = fchmod (req->int1, (mode_t)req->int2); break; |
2047 | case EIO_FCHMOD: req->result = fchmod (req->int1, (mode_t)req->int2); break; |
1940 | case EIO_FTRUNCATE: req->result = ftruncate (req->int1, req->offs); break; |
2048 | case EIO_FTRUNCATE: req->result = ftruncate (req->int1, req->offs); break; |
1941 | |
2049 | |
1942 | case EIO_CLOSE: req->result = close (req->int1); break; |
2050 | case EIO_CLOSE: req->result = eio__close (req->int1); break; |
1943 | case EIO_DUP2: req->result = dup2 (req->int1, req->int2); break; |
2051 | case EIO_DUP2: req->result = dup2 (req->int1, req->int2); break; |
1944 | case EIO_SYNC: req->result = 0; sync (); break; |
2052 | case EIO_SYNC: req->result = 0; sync (); break; |
1945 | case EIO_FSYNC: req->result = fsync (req->int1); break; |
2053 | case EIO_FSYNC: req->result = fsync (req->int1); break; |
1946 | case EIO_FDATASYNC: req->result = fdatasync (req->int1); break; |
2054 | case EIO_FDATASYNC: req->result = fdatasync (req->int1); break; |
1947 | case EIO_SYNCFS: req->result = eio__syncfs (req->int1); break; |
2055 | case EIO_SYNCFS: req->result = eio__syncfs (req->int1); break; |
… | |
… | |
1985 | default: |
2093 | default: |
1986 | req->result = EIO_ENOSYS (); |
2094 | req->result = EIO_ENOSYS (); |
1987 | break; |
2095 | break; |
1988 | } |
2096 | } |
1989 | |
2097 | |
|
|
2098 | alloc_fail: |
1990 | req->errorno = errno; |
2099 | req->errorno = errno; |
1991 | } |
2100 | } |
1992 | |
2101 | |
1993 | #ifndef EIO_NO_WRAPPERS |
2102 | #ifndef EIO_NO_WRAPPERS |
1994 | |
2103 | |
… | |
… | |
2083 | } |
2192 | } |
2084 | |
2193 | |
2085 | eio_req *eio_write (int fd, void *buf, size_t length, off_t offset, int pri, eio_cb cb, void *data) |
2194 | eio_req *eio_write (int fd, void *buf, size_t length, off_t offset, int pri, eio_cb cb, void *data) |
2086 | { |
2195 | { |
2087 | REQ (EIO_WRITE); req->int1 = fd; req->offs = offset; req->size = length; req->ptr2 = buf; SEND; |
2196 | REQ (EIO_WRITE); req->int1 = fd; req->offs = offset; req->size = length; req->ptr2 = buf; SEND; |
|
|
2197 | } |
|
|
2198 | |
|
|
2199 | eio_req *eio_fcntl (int fd, int cmd, void *arg, int pri, eio_cb cb, void *data) |
|
|
2200 | { |
|
|
2201 | REQ (EIO_IOCTL); req->int1 = fd; req->int2 = cmd; req->ptr2 = arg; SEND; |
|
|
2202 | } |
|
|
2203 | |
|
|
2204 | eio_req *eio_ioctl (int fd, unsigned long request, void *buf, int pri, eio_cb cb, void *data) |
|
|
2205 | { |
|
|
2206 | REQ (EIO_IOCTL); req->int1 = fd; req->int2 = request; req->ptr2 = buf; SEND; |
2088 | } |
2207 | } |
2089 | |
2208 | |
2090 | eio_req *eio_fstat (int fd, int pri, eio_cb cb, void *data) |
2209 | eio_req *eio_fstat (int fd, int pri, eio_cb cb, void *data) |
2091 | { |
2210 | { |
2092 | REQ (EIO_FSTAT); req->int1 = fd; SEND; |
2211 | REQ (EIO_FSTAT); req->int1 = fd; SEND; |
… | |
… | |
2237 | eio_req *eio_rename (const char *path, const char *new_path, int pri, eio_cb cb, void *data) |
2356 | eio_req *eio_rename (const char *path, const char *new_path, int pri, eio_cb cb, void *data) |
2238 | { |
2357 | { |
2239 | return eio__2path (EIO_RENAME, path, new_path, pri, cb, data); |
2358 | return eio__2path (EIO_RENAME, path, new_path, pri, cb, data); |
2240 | } |
2359 | } |
2241 | |
2360 | |
|
|
2361 | eio_req *eio_slurp (const char *path, void *buf, size_t length, off_t offset, int pri, eio_cb cb, void *data) |
|
|
2362 | { |
|
|
2363 | REQ (EIO_SLURP); PATH; req->offs = offset; req->size = length; req->ptr2 = buf; SEND; |
|
|
2364 | } |
|
|
2365 | |
2242 | eio_req *eio_custom (void (*execute)(eio_req *), int pri, eio_cb cb, void *data) |
2366 | eio_req *eio_custom (void (*execute)(eio_req *), int pri, eio_cb cb, void *data) |
2243 | { |
2367 | { |
2244 | REQ (EIO_CUSTOM); req->feed = execute; SEND; |
2368 | REQ (EIO_CUSTOM); req->feed = execute; SEND; |
2245 | } |
2369 | } |
2246 | |
2370 | |