Net::LibNFS - User-land NFS in Perl via libnfs
Create an NFS context and configure it:
my $nfs = Net::LibNFS->new()->set( version => 4, client_name => 'my-nfs-client-name', );
Blocking I/O:
# Connect to the NFS server: # $nfs->mount('some.server.name', '/the-mount-path'); # Open a directory: # my $dh = $nfs->opendir('path/to/dir'); # Print the names of directory members. # while (my $dir_obj = $dh->read()) { # NB: read() returns an object! print "Name: ", $dir_obj->name(), $/; } $nfs->unmount();
Non-blocking I/O, using IO::Async:
my $loop = IO::Async::Loop->new(); my $nfsa = $nfs->io_async($loop); $nfsa->mount('some.server.name', '/the-mount-path')->then( sub { return $nfsa->opendir('path/to/dir'); } )->then( sub ($dh) { while (my $dir_obj = $dh->read()) { print "Name: ", $dir_obj->name(), $/; } } )->then( sub { $nfsa->unmount(); } )->finally( sub { $loop->stop() } ); $loop->run();
(AnyEvent and Mojolicious are also supported.)
libnfs allows you to access NFS shares in user-space. Thus you can read & write files via NFS even if you can’t (or just would rather not) mount(8) them locally.
If a shared libnfs is available and is version 5.0.0 or later we’ll compile against that. Otherwise we try to compile our own libnfs and link to it statically.
All strings for Net::LibNFS are byte strings. Take care to decode/encode appropriately, and be sure to test with non-ASCII text (like thîß).
thîß
Of note: NFSv4’s official specification stipulates that filesystem paths should be valid UTF-8, which suggests that this library might express paths as character strings rather than byte strings. (This assumedly facilitates better interoperability with Windows and other OSes whose filesystems are conceptually Unicode.) In practice, however, some NFS servers appear not to care about UTF-8 validity. In that light, and for consistency with general POSIX practice, we stick to byte strings.
Nonetheless, for best results, ensure all filesystem paths are valid UTF-8.
Returns a list of hashrefs. Each hashref has dir (string) and groups (array of strings).
dir
groups
Returns a list of addresses (as strings).
Instantiates this class.
A setter for multiple settings; e.g., where libnfs exposes nfs_set_version(), here you pass version with the appropriate value.
nfs_set_version()
version
Recognized options are:
client_name and verifier (NFSv4 only)
client_name
verifier
tcp_syncnt, uid, gid, debug, dircache, autoreconnect, timeout
tcp_syncnt
uid
gid
debug
dircache
autoreconnect
timeout
pagecache, pagecache_ttl, readahead
pagecache
pagecache_ttl
readahead
readmax, writemax
readmax
writemax
Like Perl’s built-in.
Returns OBJ’s current directory.
This library implements non-blocking I/O by deriving a separate NFS context object from the “plain” (blocking-I/O) one.
The following methods all return a Net::LibNFS::Async instance:
$LOOP is an IO::Async::Loop instance.
Unlike io_async(), this doesn’t require a loop object because AnyEvent’s context is a singleton.
io_async()
$REACTOR (a Mojo::Reactor instance) is optional; the default is Mojo’s default reactor.
queue_length()
get_readmax(), get_writemax()
get_readmax()
get_writemax()
get_version() (i.e., the active NFS version)
get_version()
getcwd()
NFS4_F_SETLK, NFS4_F_SETLKW, F_RDLCK, F_WRLCK, & F_UNLCK - See Net::LibNFS::Filehandle’s fcntl().
NFS4_F_SETLK
NFS4_F_SETLKW
F_RDLCK
F_WRLCK
F_UNLCK
fcntl()
Attempts to contact $SERVERNAME and set OBJ to access $EXPORTNAME.
Returns OBJ.
Releases the current NFS connection.
Like Perl’s stat() but returns a Net::LibNFS::Stat instance.
stat()
Like stat() above but won’t follow symbolic links.
Opens a file and returns a Net::LibNFS::Filehandle instance to interact with it.
Creates a directory.
Deletes a directory.
Changes OBJ’s directory.
Like mknod(2).
Deletes a file.
Opens a directory and returns a Net::LibNFS::Dirhandle instance to read from it.
Like statvfs(2). Returns a Net::LibNFS::StatVFS instance.
Reads a symlink directly.
Sets a path’s mode.
Like chmod() above but won’t follow symbolic links.
chmod()
Sets a path’s ownership.
Updates $PATH’s atime & mtime. A time can be specified as either:
A nonnegative number (not necessarily an integer).
A reference to a 2-member array of nonnegative integers: seconds and microseconds.
Like utime() above but can operate on symlinks.
utime()
Like chown() above but won’t follow symbolic links.
chown()
Creates a hard link.
Creates a symbolic link.
Renames a filesystem path.
The following libnfs features are unimplemented here:
Authentication: Would be nice!
URL parsing: Seems redundant with URI.
creat() & create(): These are redundant with open().
creat()
create()
open()
access() & access2(): Merely knowing whether a given file/directory is accessible isn’t as useful as it may seem because by the time you actually use the resource the permissions/ownership could have changed. To prevent that race condition it’s better just to open()/opendir() and handle errors accordingly.
access()
access2()
opendir()
lockf(): Apparently redundant with fcntl()-based locks save for the lock-test functionality, which is generally a misstep for the same reason as access() above: by the time you use the resource—in this case, request a lock on the file—the system state may have changed.
lockf()
RFC 7530 is, as of this writing, NFSv4’s official definition.
Copyright 2022 Gasper Software Consulting. All rights reserved.
Net::LibNFS is licensed under the same terms as Perl itself (cf. perlartistic); HOWEVER, since Net::LibNFS links to libnfs, use of Net::LibNFS may imply acceptance of libnfs’s own copyright terms. See libnfs/COPYING in this distribution for details.
To install Net::LibNFS, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Net::LibNFS
CPAN shell
perl -MCPAN -e shell install Net::LibNFS
For more information on module installation, please visit the detailed CPAN module installation guide.