1 | =head1 NAME |
1 | =head1 NAME |
2 | |
2 | |
3 | IO::AIO - Asynchronous Input/Output |
3 | IO::AIO - Asynchronous/Advanced Input/Output |
4 | |
4 | |
5 | =head1 SYNOPSIS |
5 | =head1 SYNOPSIS |
6 | |
6 | |
7 | use IO::AIO; |
7 | use IO::AIO; |
8 | |
8 | |
… | |
… | |
58 | not well-supported or restricted (GNU/Linux doesn't allow them on normal |
58 | not well-supported or restricted (GNU/Linux doesn't allow them on normal |
59 | files currently, for example), and they would only support aio_read and |
59 | files currently, for example), and they would only support aio_read and |
60 | aio_write, so the remaining functionality would have to be implemented |
60 | aio_write, so the remaining functionality would have to be implemented |
61 | using threads anyway. |
61 | using threads anyway. |
62 | |
62 | |
|
|
63 | In addition to asynchronous I/O, this module also exports some rather |
|
|
64 | arcane interfaces, such as C<madvise> or linux's C<splice> system call, |
|
|
65 | which is why the C<A> in C<AIO> can also mean I<advanced>. |
|
|
66 | |
63 | Although the module will work in the presence of other (Perl-) threads, |
67 | Although the module will work in the presence of other (Perl-) threads, |
64 | it is currently not reentrant in any way, so use appropriate locking |
68 | it is currently not reentrant in any way, so use appropriate locking |
65 | yourself, always call C<poll_cb> from within the same thread, or never |
69 | yourself, always call C<poll_cb> from within the same thread, or never |
66 | call C<poll_cb> (or other C<aio_> functions) recursively. |
70 | call C<poll_cb> (or other C<aio_> functions) recursively. |
67 | |
71 | |
… | |
… | |
167 | use common::sense; |
171 | use common::sense; |
168 | |
172 | |
169 | use base 'Exporter'; |
173 | use base 'Exporter'; |
170 | |
174 | |
171 | BEGIN { |
175 | BEGIN { |
172 | our $VERSION = 4.34; |
176 | our $VERSION = 4.35; |
173 | |
177 | |
174 | our @AIO_REQ = qw(aio_sendfile aio_seek aio_read aio_write aio_open aio_close |
178 | our @AIO_REQ = qw(aio_sendfile aio_seek aio_read aio_write aio_open aio_close |
175 | aio_stat aio_lstat aio_unlink aio_rmdir aio_readdir aio_readdirx |
179 | aio_stat aio_lstat aio_unlink aio_rmdir aio_readdir aio_readdirx |
176 | aio_scandir aio_symlink aio_readlink aio_realpath aio_fcntl aio_ioctl |
180 | aio_scandir aio_symlink aio_readlink aio_realpath aio_fcntl aio_ioctl |
177 | aio_sync aio_fsync aio_syncfs aio_fdatasync aio_sync_file_range |
181 | aio_sync aio_fsync aio_syncfs aio_fdatasync aio_sync_file_range |
178 | aio_pathsync aio_readahead aio_fiemap aio_allocate |
182 | aio_pathsync aio_readahead aio_fiemap aio_allocate |
179 | aio_rename aio_link aio_move aio_copy aio_group |
183 | aio_rename aio_rename2 aio_link aio_move aio_copy aio_group |
180 | aio_nop aio_mknod aio_load aio_rmtree aio_mkdir aio_chown |
184 | aio_nop aio_mknod aio_load aio_rmtree aio_mkdir aio_chown |
181 | aio_chmod aio_utime aio_truncate |
185 | aio_chmod aio_utime aio_truncate |
182 | aio_msync aio_mtouch aio_mlock aio_mlockall |
186 | aio_msync aio_mtouch aio_mlock aio_mlockall |
183 | aio_statvfs |
187 | aio_statvfs |
184 | aio_wd); |
188 | aio_wd); |
… | |
… | |
229 | aio_link $srcpath, $dstpath, $callback->($status) |
233 | aio_link $srcpath, $dstpath, $callback->($status) |
230 | aio_symlink $srcpath, $dstpath, $callback->($status) |
234 | aio_symlink $srcpath, $dstpath, $callback->($status) |
231 | aio_readlink $pathname, $callback->($link) |
235 | aio_readlink $pathname, $callback->($link) |
232 | aio_realpath $pathname, $callback->($path) |
236 | aio_realpath $pathname, $callback->($path) |
233 | aio_rename $srcpath, $dstpath, $callback->($status) |
237 | aio_rename $srcpath, $dstpath, $callback->($status) |
|
|
238 | aio_rename2 $srcpath, $dstpath, $flags, $callback->($status) |
234 | aio_mkdir $pathname, $mode, $callback->($status) |
239 | aio_mkdir $pathname, $mode, $callback->($status) |
235 | aio_rmdir $pathname, $callback->($status) |
240 | aio_rmdir $pathname, $callback->($status) |
236 | aio_readdir $pathname, $callback->($entries) |
241 | aio_readdir $pathname, $callback->($entries) |
237 | aio_readdirx $pathname, $flags, $callback->($entries, $flags) |
242 | aio_readdirx $pathname, $flags, $callback->($entries, $flags) |
238 | IO::AIO::READDIR_DENTS IO::AIO::READDIR_DIRS_FIRST |
243 | IO::AIO::READDIR_DENTS IO::AIO::READDIR_DIRS_FIRST |
… | |
… | |
248 | aio_syncfs $fh, $callback->($status) |
253 | aio_syncfs $fh, $callback->($status) |
249 | aio_fsync $fh, $callback->($status) |
254 | aio_fsync $fh, $callback->($status) |
250 | aio_fdatasync $fh, $callback->($status) |
255 | aio_fdatasync $fh, $callback->($status) |
251 | aio_sync_file_range $fh, $offset, $nbytes, $flags, $callback->($status) |
256 | aio_sync_file_range $fh, $offset, $nbytes, $flags, $callback->($status) |
252 | aio_pathsync $pathname, $callback->($status) |
257 | aio_pathsync $pathname, $callback->($status) |
253 | aio_msync $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
258 | aio_msync $scalar, $offset = 0, $length = undef, flags = MS_SYNC, $callback->($status) |
254 | aio_mtouch $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
259 | aio_mtouch $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
255 | aio_mlock $scalar, $offset = 0, $length = undef, $callback->($status) |
260 | aio_mlock $scalar, $offset = 0, $length = undef, $callback->($status) |
256 | aio_mlockall $flags, $callback->($status) |
261 | aio_mlockall $flags, $callback->($status) |
257 | aio_group $callback->(...) |
262 | aio_group $callback->(...) |
258 | aio_nop $callback->() |
263 | aio_nop $callback->() |
… | |
… | |
441 | =item aio_read $fh,$offset,$length, $data,$dataoffset, $callback->($retval) |
446 | =item aio_read $fh,$offset,$length, $data,$dataoffset, $callback->($retval) |
442 | |
447 | |
443 | =item aio_write $fh,$offset,$length, $data,$dataoffset, $callback->($retval) |
448 | =item aio_write $fh,$offset,$length, $data,$dataoffset, $callback->($retval) |
444 | |
449 | |
445 | Reads or writes C<$length> bytes from or to the specified C<$fh> and |
450 | Reads or writes C<$length> bytes from or to the specified C<$fh> and |
446 | C<$offset> into the scalar given by C<$data> and offset C<$dataoffset> |
451 | C<$offset> into the scalar given by C<$data> and offset C<$dataoffset> and |
447 | and calls the callback without the actual number of bytes read (or -1 on |
452 | calls the callback with the actual number of bytes transferred (or -1 on |
448 | error, just like the syscall). |
453 | error, just like the syscall). |
449 | |
454 | |
450 | C<aio_read> will, like C<sysread>, shrink or grow the C<$data> scalar to |
455 | C<aio_read> will, like C<sysread>, shrink or grow the C<$data> scalar to |
451 | offset plus the actual number of bytes read. |
456 | offset plus the actual number of bytes read. |
452 | |
457 | |
… | |
… | |
808 | On systems that support the AIO::WD working directory abstraction |
813 | On systems that support the AIO::WD working directory abstraction |
809 | natively, the case C<[$wd, "."]> as C<$srcpath> is specialcased - instead |
814 | natively, the case C<[$wd, "."]> as C<$srcpath> is specialcased - instead |
810 | of failing, C<rename> is called on the absolute path of C<$wd>. |
815 | of failing, C<rename> is called on the absolute path of C<$wd>. |
811 | |
816 | |
812 | |
817 | |
|
|
818 | =item aio_rename2 $srcpath, $dstpath, $flags, $callback->($status) |
|
|
819 | |
|
|
820 | Basically a version of C<aio_rename> with an additional C<$flags> |
|
|
821 | argument. Calling this with C<$flags=0> is the same as calling |
|
|
822 | C<aio_rename>. |
|
|
823 | |
|
|
824 | Non-zero flags are currently only supported on GNU/Linux systems that |
|
|
825 | support renameat2. Other systems fail with C<ENOSYS> in this case. |
|
|
826 | |
|
|
827 | The following constants are available (missing ones are, as usual C<0>), |
|
|
828 | see renameat2(2) for details: |
|
|
829 | |
|
|
830 | C<IO::AIO::RENAME_NOREPLACE>, C<IO::AIO::RENAME_EXCHANGE> |
|
|
831 | and C<IO::AIO::RENAME_WHITEOUT>. |
|
|
832 | |
|
|
833 | |
813 | =item aio_mkdir $pathname, $mode, $callback->($status) |
834 | =item aio_mkdir $pathname, $mode, $callback->($status) |
814 | |
835 | |
815 | Asynchronously mkdir (create) a directory and call the callback with |
836 | Asynchronously mkdir (create) a directory and call the callback with |
816 | the result code. C<$mode> will be modified by the umask at the time the |
837 | the result code. C<$mode> will be modified by the umask at the time the |
817 | request is executed, so do not change your umask. |
838 | request is executed, so do not change your umask. |
… | |
… | |
1250 | other processes), although if you are careful and know what you are doing, |
1271 | other processes), although if you are careful and know what you are doing, |
1251 | you still can. |
1272 | you still can. |
1252 | |
1273 | |
1253 | The following constants are available (missing ones are, as usual C<0>): |
1274 | The following constants are available (missing ones are, as usual C<0>): |
1254 | |
1275 | |
|
|
1276 | C<F_DUPFD_CLOEXEC>, |
|
|
1277 | |
|
|
1278 | C<F_OFD_GETLK>, C<F_OFD_SETLK>, C<F_OFD_GETLKW>, |
|
|
1279 | |
1255 | C<FIFREEZE>, C<FITHAW>, C<FITRIM>, C<FICLONE>, C<FICLONERANGE>, C<FIDEDUPERANGE>. |
1280 | C<FIFREEZE>, C<FITHAW>, C<FITRIM>, C<FICLONE>, C<FICLONERANGE>, C<FIDEDUPERANGE>. |
1256 | |
1281 | |
1257 | C<FS_IOC_GETFLAGS>, C<FS_IOC_SETFLAGS>, C<FS_IOC_GETVERSION>, C<FS_IOC_SETVERSION>, |
1282 | C<FS_IOC_GETFLAGS>, C<FS_IOC_SETFLAGS>, C<FS_IOC_GETVERSION>, C<FS_IOC_SETVERSION>, |
1258 | C<FS_IOC_FIEMAP>. |
1283 | C<FS_IOC_FIEMAP>. |
1259 | |
1284 | |
… | |
… | |
1346 | }; |
1371 | }; |
1347 | |
1372 | |
1348 | $grp |
1373 | $grp |
1349 | } |
1374 | } |
1350 | |
1375 | |
1351 | =item aio_msync $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
1376 | =item aio_msync $scalar, $offset = 0, $length = undef, flags = MS_SYNC, $callback->($status) |
1352 | |
1377 | |
1353 | This is a rather advanced IO::AIO call, which only works on mmap(2)ed |
1378 | This is a rather advanced IO::AIO call, which only works on mmap(2)ed |
1354 | scalars (see the C<IO::AIO::mmap> function, although it also works on data |
1379 | scalars (see the C<IO::AIO::mmap> function, although it also works on data |
1355 | scalars managed by the L<Sys::Mmap> or L<Mmap> modules, note that the |
1380 | scalars managed by the L<Sys::Mmap> or L<Mmap> modules, note that the |
1356 | scalar must only be modified in-place while an aio operation is pending on |
1381 | scalar must only be modified in-place while an aio operation is pending on |
… | |
… | |
1358 | |
1383 | |
1359 | It calls the C<msync> function of your OS, if available, with the memory |
1384 | It calls the C<msync> function of your OS, if available, with the memory |
1360 | area starting at C<$offset> in the string and ending C<$length> bytes |
1385 | area starting at C<$offset> in the string and ending C<$length> bytes |
1361 | later. If C<$length> is negative, counts from the end, and if C<$length> |
1386 | later. If C<$length> is negative, counts from the end, and if C<$length> |
1362 | is C<undef>, then it goes till the end of the string. The flags can be |
1387 | is C<undef>, then it goes till the end of the string. The flags can be |
1363 | a combination of C<IO::AIO::MS_ASYNC>, C<IO::AIO::MS_INVALIDATE> and |
1388 | either C<IO::AIO::MS_ASYNC> or C<IO::AIO::MS_SYNC>, plus an optional |
1364 | C<IO::AIO::MS_SYNC>. |
1389 | C<IO::AIO::MS_INVALIDATE>. |
1365 | |
1390 | |
1366 | =item aio_mtouch $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
1391 | =item aio_mtouch $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
1367 | |
1392 | |
1368 | This is a rather advanced IO::AIO call, which works best on mmap(2)ed |
1393 | This is a rather advanced IO::AIO call, which works best on mmap(2)ed |
1369 | scalars. |
1394 | scalars. |
… | |
… | |
2065 | manpage for details). The following advice constants are |
2090 | manpage for details). The following advice constants are |
2066 | available: C<IO::AIO::MADV_NORMAL>, C<IO::AIO::MADV_SEQUENTIAL>, |
2091 | available: C<IO::AIO::MADV_NORMAL>, C<IO::AIO::MADV_SEQUENTIAL>, |
2067 | C<IO::AIO::MADV_RANDOM>, C<IO::AIO::MADV_WILLNEED>, C<IO::AIO::MADV_DONTNEED>, |
2092 | C<IO::AIO::MADV_RANDOM>, C<IO::AIO::MADV_WILLNEED>, C<IO::AIO::MADV_DONTNEED>, |
2068 | C<IO::AIO::MADV_FREE>. |
2093 | C<IO::AIO::MADV_FREE>. |
2069 | |
2094 | |
|
|
2095 | If C<$offset> is negative, counts from the end. If C<$length> is negative, |
|
|
2096 | the remaining length of the C<$scalar> is used. If possible, C<$length> |
|
|
2097 | will be reduced to fit into the C<$scalar>. |
|
|
2098 | |
2070 | On systems that do not implement C<posix_madvise>, this function returns |
2099 | On systems that do not implement C<posix_madvise>, this function returns |
2071 | ENOSYS, otherwise the return value of C<posix_madvise>. |
2100 | ENOSYS, otherwise the return value of C<posix_madvise>. |
2072 | |
2101 | |
2073 | =item IO::AIO::mprotect $scalar, $offset, $len, $protect |
2102 | =item IO::AIO::mprotect $scalar, $offset, $len, $protect |
2074 | |
2103 | |
2075 | Simply calls the C<mprotect> function on the preferably AIO::mmap'ed |
2104 | Simply calls the C<mprotect> function on the preferably AIO::mmap'ed |
2076 | $scalar (see its manpage for details). The following protect |
2105 | $scalar (see its manpage for details). The following protect |
2077 | constants are available: C<IO::AIO::PROT_NONE>, C<IO::AIO::PROT_READ>, |
2106 | constants are available: C<IO::AIO::PROT_NONE>, C<IO::AIO::PROT_READ>, |
2078 | C<IO::AIO::PROT_WRITE>, C<IO::AIO::PROT_EXEC>. |
2107 | C<IO::AIO::PROT_WRITE>, C<IO::AIO::PROT_EXEC>. |
2079 | |
2108 | |
|
|
2109 | If C<$offset> is negative, counts from the end. If C<$length> is negative, |
|
|
2110 | the remaining length of the C<$scalar> is used. If possible, C<$length> |
|
|
2111 | will be reduced to fit into the C<$scalar>. |
|
|
2112 | |
2080 | On systems that do not implement C<mprotect>, this function returns |
2113 | On systems that do not implement C<mprotect>, this function returns |
2081 | ENOSYS, otherwise the return value of C<mprotect>. |
2114 | ENOSYS, otherwise the return value of C<mprotect>. |
2082 | |
2115 | |
2083 | =item IO::AIO::mmap $scalar, $length, $prot, $flags, $fh[, $offset] |
2116 | =item IO::AIO::mmap $scalar, $length, $prot, $flags, $fh[, $offset] |
2084 | |
2117 | |
2085 | Memory-maps a file (or anonymous memory range) and attaches it to the |
2118 | Memory-maps a file (or anonymous memory range) and attaches it to the |
2086 | given C<$scalar>, which will act like a string scalar. Returns true on |
2119 | given C<$scalar>, which will act like a string scalar. Returns true on |
2087 | success, and false otherwise. |
2120 | success, and false otherwise. |
2088 | |
2121 | |
|
|
2122 | The scalar must exist, but its contents do not matter - this means you |
|
|
2123 | cannot use a nonexistant array or hash element. When in doubt, C<undef> |
|
|
2124 | the scalar first. |
|
|
2125 | |
2089 | The only operations allowed on the scalar are C<substr>/C<vec> that don't |
2126 | The only operations allowed on the mmapped scalar are C<substr>/C<vec>, |
2090 | change the string length, and most read-only operations such as copying it |
2127 | which don't change the string length, and most read-only operations such |
2091 | or searching it with regexes and so on. |
2128 | as copying it or searching it with regexes and so on. |
2092 | |
2129 | |
2093 | Anything else is unsafe and will, at best, result in memory leaks. |
2130 | Anything else is unsafe and will, at best, result in memory leaks. |
2094 | |
2131 | |
2095 | The memory map associated with the C<$scalar> is automatically removed |
2132 | The memory map associated with the C<$scalar> is automatically removed |
2096 | when the C<$scalar> is destroyed, or when the C<IO::AIO::mmap> or |
2133 | when the C<$scalar> is undef'd or destroyed, or when the C<IO::AIO::mmap> |
2097 | C<IO::AIO::munmap> functions are called. |
2134 | or C<IO::AIO::munmap> functions are called on it. |
2098 | |
2135 | |
2099 | This calls the C<mmap>(2) function internally. See your system's manual |
2136 | This calls the C<mmap>(2) function internally. See your system's manual |
2100 | page for details on the C<$length>, C<$prot> and C<$flags> parameters. |
2137 | page for details on the C<$length>, C<$prot> and C<$flags> parameters. |
2101 | |
2138 | |
2102 | The C<$length> must be larger than zero and smaller than the actual |
2139 | The C<$length> must be larger than zero and smaller than the actual |