… | |
… | |
171 | use common::sense; |
171 | use common::sense; |
172 | |
172 | |
173 | use base 'Exporter'; |
173 | use base 'Exporter'; |
174 | |
174 | |
175 | BEGIN { |
175 | BEGIN { |
176 | our $VERSION = 4.34; |
176 | our $VERSION = 4.35; |
177 | |
177 | |
178 | 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 |
179 | 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 |
180 | 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 |
181 | 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 |
182 | aio_pathsync aio_readahead aio_fiemap aio_allocate |
182 | aio_pathsync aio_readahead aio_fiemap aio_allocate |
183 | aio_rename aio_link aio_move aio_copy aio_group |
183 | aio_rename aio_rename2 aio_link aio_move aio_copy aio_group |
184 | 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 |
185 | aio_chmod aio_utime aio_truncate |
185 | aio_chmod aio_utime aio_truncate |
186 | aio_msync aio_mtouch aio_mlock aio_mlockall |
186 | aio_msync aio_mtouch aio_mlock aio_mlockall |
187 | aio_statvfs |
187 | aio_statvfs |
188 | aio_wd); |
188 | aio_wd); |
… | |
… | |
233 | aio_link $srcpath, $dstpath, $callback->($status) |
233 | aio_link $srcpath, $dstpath, $callback->($status) |
234 | aio_symlink $srcpath, $dstpath, $callback->($status) |
234 | aio_symlink $srcpath, $dstpath, $callback->($status) |
235 | aio_readlink $pathname, $callback->($link) |
235 | aio_readlink $pathname, $callback->($link) |
236 | aio_realpath $pathname, $callback->($path) |
236 | aio_realpath $pathname, $callback->($path) |
237 | aio_rename $srcpath, $dstpath, $callback->($status) |
237 | aio_rename $srcpath, $dstpath, $callback->($status) |
|
|
238 | aio_rename2 $srcpath, $dstpath, $flags, $callback->($status) |
238 | aio_mkdir $pathname, $mode, $callback->($status) |
239 | aio_mkdir $pathname, $mode, $callback->($status) |
239 | aio_rmdir $pathname, $callback->($status) |
240 | aio_rmdir $pathname, $callback->($status) |
240 | aio_readdir $pathname, $callback->($entries) |
241 | aio_readdir $pathname, $callback->($entries) |
241 | aio_readdirx $pathname, $flags, $callback->($entries, $flags) |
242 | aio_readdirx $pathname, $flags, $callback->($entries, $flags) |
242 | IO::AIO::READDIR_DENTS IO::AIO::READDIR_DIRS_FIRST |
243 | IO::AIO::READDIR_DENTS IO::AIO::READDIR_DIRS_FIRST |
… | |
… | |
252 | aio_syncfs $fh, $callback->($status) |
253 | aio_syncfs $fh, $callback->($status) |
253 | aio_fsync $fh, $callback->($status) |
254 | aio_fsync $fh, $callback->($status) |
254 | aio_fdatasync $fh, $callback->($status) |
255 | aio_fdatasync $fh, $callback->($status) |
255 | aio_sync_file_range $fh, $offset, $nbytes, $flags, $callback->($status) |
256 | aio_sync_file_range $fh, $offset, $nbytes, $flags, $callback->($status) |
256 | aio_pathsync $pathname, $callback->($status) |
257 | aio_pathsync $pathname, $callback->($status) |
257 | aio_msync $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
258 | aio_msync $scalar, $offset = 0, $length = undef, flags = MS_SYNC, $callback->($status) |
258 | aio_mtouch $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
259 | aio_mtouch $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
259 | aio_mlock $scalar, $offset = 0, $length = undef, $callback->($status) |
260 | aio_mlock $scalar, $offset = 0, $length = undef, $callback->($status) |
260 | aio_mlockall $flags, $callback->($status) |
261 | aio_mlockall $flags, $callback->($status) |
261 | aio_group $callback->(...) |
262 | aio_group $callback->(...) |
262 | aio_nop $callback->() |
263 | aio_nop $callback->() |
… | |
… | |
812 | On systems that support the AIO::WD working directory abstraction |
813 | On systems that support the AIO::WD working directory abstraction |
813 | natively, the case C<[$wd, "."]> as C<$srcpath> is specialcased - instead |
814 | natively, the case C<[$wd, "."]> as C<$srcpath> is specialcased - instead |
814 | 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>. |
815 | |
816 | |
816 | |
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 | |
817 | =item aio_mkdir $pathname, $mode, $callback->($status) |
834 | =item aio_mkdir $pathname, $mode, $callback->($status) |
818 | |
835 | |
819 | Asynchronously mkdir (create) a directory and call the callback with |
836 | Asynchronously mkdir (create) a directory and call the callback with |
820 | 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 |
821 | request is executed, so do not change your umask. |
838 | request is executed, so do not change your umask. |
… | |
… | |
1350 | }; |
1367 | }; |
1351 | |
1368 | |
1352 | $grp |
1369 | $grp |
1353 | } |
1370 | } |
1354 | |
1371 | |
1355 | =item aio_msync $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
1372 | =item aio_msync $scalar, $offset = 0, $length = undef, flags = MS_SYNC, $callback->($status) |
1356 | |
1373 | |
1357 | This is a rather advanced IO::AIO call, which only works on mmap(2)ed |
1374 | This is a rather advanced IO::AIO call, which only works on mmap(2)ed |
1358 | scalars (see the C<IO::AIO::mmap> function, although it also works on data |
1375 | scalars (see the C<IO::AIO::mmap> function, although it also works on data |
1359 | scalars managed by the L<Sys::Mmap> or L<Mmap> modules, note that the |
1376 | scalars managed by the L<Sys::Mmap> or L<Mmap> modules, note that the |
1360 | scalar must only be modified in-place while an aio operation is pending on |
1377 | scalar must only be modified in-place while an aio operation is pending on |
… | |
… | |
1362 | |
1379 | |
1363 | It calls the C<msync> function of your OS, if available, with the memory |
1380 | It calls the C<msync> function of your OS, if available, with the memory |
1364 | area starting at C<$offset> in the string and ending C<$length> bytes |
1381 | area starting at C<$offset> in the string and ending C<$length> bytes |
1365 | later. If C<$length> is negative, counts from the end, and if C<$length> |
1382 | later. If C<$length> is negative, counts from the end, and if C<$length> |
1366 | is C<undef>, then it goes till the end of the string. The flags can be |
1383 | is C<undef>, then it goes till the end of the string. The flags can be |
1367 | a combination of C<IO::AIO::MS_ASYNC>, C<IO::AIO::MS_INVALIDATE> and |
1384 | either C<IO::AIO::MS_ASYNC> or C<IO::AIO::MS_SYNC>, plus an optional |
1368 | C<IO::AIO::MS_SYNC>. |
1385 | C<IO::AIO::MS_INVALIDATE>. |
1369 | |
1386 | |
1370 | =item aio_mtouch $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
1387 | =item aio_mtouch $scalar, $offset = 0, $length = undef, flags = 0, $callback->($status) |
1371 | |
1388 | |
1372 | This is a rather advanced IO::AIO call, which works best on mmap(2)ed |
1389 | This is a rather advanced IO::AIO call, which works best on mmap(2)ed |
1373 | scalars. |
1390 | scalars. |
… | |
… | |
2069 | manpage for details). The following advice constants are |
2086 | manpage for details). The following advice constants are |
2070 | available: C<IO::AIO::MADV_NORMAL>, C<IO::AIO::MADV_SEQUENTIAL>, |
2087 | available: C<IO::AIO::MADV_NORMAL>, C<IO::AIO::MADV_SEQUENTIAL>, |
2071 | C<IO::AIO::MADV_RANDOM>, C<IO::AIO::MADV_WILLNEED>, C<IO::AIO::MADV_DONTNEED>, |
2088 | C<IO::AIO::MADV_RANDOM>, C<IO::AIO::MADV_WILLNEED>, C<IO::AIO::MADV_DONTNEED>, |
2072 | C<IO::AIO::MADV_FREE>. |
2089 | C<IO::AIO::MADV_FREE>. |
2073 | |
2090 | |
|
|
2091 | If C<$offset> is negative, counts from the end. If C<$length> is negative, |
|
|
2092 | the remaining length of the C<$scalar> is used. If possible, C<$length> |
|
|
2093 | will be reduced to fit into the C<$scalar>. |
|
|
2094 | |
2074 | On systems that do not implement C<posix_madvise>, this function returns |
2095 | On systems that do not implement C<posix_madvise>, this function returns |
2075 | ENOSYS, otherwise the return value of C<posix_madvise>. |
2096 | ENOSYS, otherwise the return value of C<posix_madvise>. |
2076 | |
2097 | |
2077 | =item IO::AIO::mprotect $scalar, $offset, $len, $protect |
2098 | =item IO::AIO::mprotect $scalar, $offset, $len, $protect |
2078 | |
2099 | |
2079 | Simply calls the C<mprotect> function on the preferably AIO::mmap'ed |
2100 | Simply calls the C<mprotect> function on the preferably AIO::mmap'ed |
2080 | $scalar (see its manpage for details). The following protect |
2101 | $scalar (see its manpage for details). The following protect |
2081 | constants are available: C<IO::AIO::PROT_NONE>, C<IO::AIO::PROT_READ>, |
2102 | constants are available: C<IO::AIO::PROT_NONE>, C<IO::AIO::PROT_READ>, |
2082 | C<IO::AIO::PROT_WRITE>, C<IO::AIO::PROT_EXEC>. |
2103 | C<IO::AIO::PROT_WRITE>, C<IO::AIO::PROT_EXEC>. |
2083 | |
2104 | |
|
|
2105 | If C<$offset> is negative, counts from the end. If C<$length> is negative, |
|
|
2106 | the remaining length of the C<$scalar> is used. If possible, C<$length> |
|
|
2107 | will be reduced to fit into the C<$scalar>. |
|
|
2108 | |
2084 | On systems that do not implement C<mprotect>, this function returns |
2109 | On systems that do not implement C<mprotect>, this function returns |
2085 | ENOSYS, otherwise the return value of C<mprotect>. |
2110 | ENOSYS, otherwise the return value of C<mprotect>. |
2086 | |
2111 | |
2087 | =item IO::AIO::mmap $scalar, $length, $prot, $flags, $fh[, $offset] |
2112 | =item IO::AIO::mmap $scalar, $length, $prot, $flags, $fh[, $offset] |
2088 | |
2113 | |
2089 | Memory-maps a file (or anonymous memory range) and attaches it to the |
2114 | Memory-maps a file (or anonymous memory range) and attaches it to the |
2090 | given C<$scalar>, which will act like a string scalar. Returns true on |
2115 | given C<$scalar>, which will act like a string scalar. Returns true on |
2091 | success, and false otherwise. |
2116 | success, and false otherwise. |
2092 | |
2117 | |
|
|
2118 | The scalar must exist, but its contents do not matter - this means you |
|
|
2119 | cannot use a nonexistant array or hash element. When in doubt, C<undef> |
|
|
2120 | the scalar first. |
|
|
2121 | |
2093 | The only operations allowed on the scalar are C<substr>/C<vec> that don't |
2122 | The only operations allowed on the mmapped scalar are C<substr>/C<vec>, |
2094 | change the string length, and most read-only operations such as copying it |
2123 | which don't change the string length, and most read-only operations such |
2095 | or searching it with regexes and so on. |
2124 | as copying it or searching it with regexes and so on. |
2096 | |
2125 | |
2097 | Anything else is unsafe and will, at best, result in memory leaks. |
2126 | Anything else is unsafe and will, at best, result in memory leaks. |
2098 | |
2127 | |
2099 | The memory map associated with the C<$scalar> is automatically removed |
2128 | The memory map associated with the C<$scalar> is automatically removed |
2100 | when the C<$scalar> is destroyed, or when the C<IO::AIO::mmap> or |
2129 | when the C<$scalar> is undef'd or destroyed, or when the C<IO::AIO::mmap> |
2101 | C<IO::AIO::munmap> functions are called. |
2130 | or C<IO::AIO::munmap> functions are called on it. |
2102 | |
2131 | |
2103 | This calls the C<mmap>(2) function internally. See your system's manual |
2132 | This calls the C<mmap>(2) function internally. See your system's manual |
2104 | page for details on the C<$length>, C<$prot> and C<$flags> parameters. |
2133 | page for details on the C<$length>, C<$prot> and C<$flags> parameters. |
2105 | |
2134 | |
2106 | The C<$length> must be larger than zero and smaller than the actual |
2135 | The C<$length> must be larger than zero and smaller than the actual |