… | |
… | |
167 | use common::sense; |
167 | use common::sense; |
168 | |
168 | |
169 | use base 'Exporter'; |
169 | use base 'Exporter'; |
170 | |
170 | |
171 | BEGIN { |
171 | BEGIN { |
172 | our $VERSION = 4.33; |
172 | our $VERSION = 4.34; |
173 | |
173 | |
174 | our @AIO_REQ = qw(aio_sendfile aio_seek aio_read aio_write aio_open aio_close |
174 | 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 |
175 | aio_stat aio_lstat aio_unlink aio_rmdir aio_readdir aio_readdirx |
176 | aio_scandir aio_symlink aio_readlink aio_realpath aio_sync |
176 | aio_scandir aio_symlink aio_readlink aio_realpath aio_fcntl aio_ioctl |
177 | aio_fsync aio_syncfs aio_fdatasync aio_sync_file_range aio_allocate |
177 | aio_sync aio_fsync aio_syncfs aio_fdatasync aio_sync_file_range |
178 | aio_pathsync aio_readahead aio_fiemap |
178 | aio_pathsync aio_readahead aio_fiemap aio_allocate |
179 | aio_rename aio_link aio_move aio_copy aio_group |
179 | aio_rename aio_link aio_move aio_copy aio_group |
180 | aio_nop aio_mknod aio_load aio_rmtree aio_mkdir aio_chown |
180 | aio_nop aio_mknod aio_load aio_rmtree aio_mkdir aio_chown |
181 | aio_chmod aio_utime aio_truncate |
181 | aio_chmod aio_utime aio_truncate |
182 | aio_msync aio_mtouch aio_mlock aio_mlockall |
182 | aio_msync aio_mtouch aio_mlock aio_mlockall |
183 | aio_statvfs |
183 | aio_statvfs |
… | |
… | |
240 | aio_scandir $pathname, $maxreq, $callback->($dirs, $nondirs) |
240 | aio_scandir $pathname, $maxreq, $callback->($dirs, $nondirs) |
241 | aio_load $pathname, $data, $callback->($status) |
241 | aio_load $pathname, $data, $callback->($status) |
242 | aio_copy $srcpath, $dstpath, $callback->($status) |
242 | aio_copy $srcpath, $dstpath, $callback->($status) |
243 | aio_move $srcpath, $dstpath, $callback->($status) |
243 | aio_move $srcpath, $dstpath, $callback->($status) |
244 | aio_rmtree $pathname, $callback->($status) |
244 | aio_rmtree $pathname, $callback->($status) |
|
|
245 | aio_fcntl $fh, $cmd, $arg, $callback->($status) |
|
|
246 | aio_ioctl $fh, $request, $buf, $callback->($status) |
245 | aio_sync $callback->($status) |
247 | aio_sync $callback->($status) |
246 | aio_syncfs $fh, $callback->($status) |
248 | aio_syncfs $fh, $callback->($status) |
247 | aio_fsync $fh, $callback->($status) |
249 | aio_fsync $fh, $callback->($status) |
248 | aio_fdatasync $fh, $callback->($status) |
250 | aio_fdatasync $fh, $callback->($status) |
249 | aio_sync_file_range $fh, $offset, $nbytes, $flags, $callback->($status) |
251 | aio_sync_file_range $fh, $offset, $nbytes, $flags, $callback->($status) |
… | |
… | |
508 | As native sendfile syscalls (as practically any non-POSIX interface hacked |
510 | As native sendfile syscalls (as practically any non-POSIX interface hacked |
509 | together in a hurry to improve benchmark numbers) tend to be rather buggy |
511 | together in a hurry to improve benchmark numbers) tend to be rather buggy |
510 | on many systems, this implementation tries to work around some known bugs |
512 | on many systems, this implementation tries to work around some known bugs |
511 | in Linux and FreeBSD kernels (probably others, too), but that might fail, |
513 | in Linux and FreeBSD kernels (probably others, too), but that might fail, |
512 | so you really really should check the return value of C<aio_sendfile> - |
514 | so you really really should check the return value of C<aio_sendfile> - |
513 | fewre bytes than expected might have been transferred. |
515 | fewer bytes than expected might have been transferred. |
514 | |
516 | |
515 | |
517 | |
516 | =item aio_readahead $fh,$offset,$length, $callback->($retval) |
518 | =item aio_readahead $fh,$offset,$length, $callback->($retval) |
517 | |
519 | |
518 | C<aio_readahead> populates the page cache with data from a file so that |
520 | C<aio_readahead> populates the page cache with data from a file so that |
… | |
… | |
522 | whole pages, so that offset is effectively rounded down to a page boundary |
524 | whole pages, so that offset is effectively rounded down to a page boundary |
523 | and bytes are read up to the next page boundary greater than or equal to |
525 | and bytes are read up to the next page boundary greater than or equal to |
524 | (off-set+length). C<aio_readahead> does not read beyond the end of the |
526 | (off-set+length). C<aio_readahead> does not read beyond the end of the |
525 | file. The current file offset of the file is left unchanged. |
527 | file. The current file offset of the file is left unchanged. |
526 | |
528 | |
527 | If that syscall doesn't exist (likely if your OS isn't Linux) it will be |
529 | If that syscall doesn't exist (likely if your kernel isn't Linux) it will |
528 | emulated by simply reading the data, which would have a similar effect. |
530 | be emulated by simply reading the data, which would have a similar effect. |
529 | |
531 | |
530 | |
532 | |
531 | =item aio_stat $fh_or_path, $callback->($status) |
533 | =item aio_stat $fh_or_path, $callback->($status) |
532 | |
534 | |
533 | =item aio_lstat $fh, $callback->($status) |
535 | =item aio_lstat $fh, $callback->($status) |
… | |
… | |
1227 | }; |
1229 | }; |
1228 | |
1230 | |
1229 | $grp |
1231 | $grp |
1230 | } |
1232 | } |
1231 | |
1233 | |
|
|
1234 | =item aio_fcntl $fh, $cmd, $arg, $callback->($status) |
|
|
1235 | |
|
|
1236 | =item aio_ioctl $fh, $request, $buf, $callback->($status) |
|
|
1237 | |
|
|
1238 | These work just like the C<fcntl> and C<ioctl> built-in functions, except |
|
|
1239 | they execute asynchronously and pass the return value to the callback. |
|
|
1240 | |
|
|
1241 | Both calls can be used for a lot of things, some of which make more sense |
|
|
1242 | to run asynchronously in their own thread, while some others make less |
|
|
1243 | sense. For example, calls that block waiting for external events, such |
|
|
1244 | as locking, will also lock down an I/O thread while it is waiting, which |
|
|
1245 | can deadlock the whole I/O system. At the same time, there might be no |
|
|
1246 | alternative to using a thread to wait. |
|
|
1247 | |
|
|
1248 | So in general, you should only use these calls for things that do |
|
|
1249 | (filesystem) I/O, not for things that wait for other events (network, |
|
|
1250 | other processes), although if you are careful and know what you are doing, |
|
|
1251 | you still can. |
|
|
1252 | |
1232 | =item aio_sync $callback->($status) |
1253 | =item aio_sync $callback->($status) |
1233 | |
1254 | |
1234 | Asynchronously call sync and call the callback when finished. |
1255 | Asynchronously call sync and call the callback when finished. |
1235 | |
1256 | |
1236 | =item aio_fsync $fh, $callback->($status) |
1257 | =item aio_fsync $fh, $callback->($status) |