diff options
Diffstat (limited to 'perl/Fuse.pm')
| -rw-r--r-- | perl/Fuse.pm | 27 |
1 files changed, 21 insertions, 6 deletions
diff --git a/perl/Fuse.pm b/perl/Fuse.pm index 93acfb6..3a20fd9 100644 --- a/perl/Fuse.pm +++ b/perl/Fuse.pm @@ -65,8 +65,8 @@ sub AUTOLOAD { bootstrap Fuse $VERSION; sub main { - my (@subs) = (0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0); - my (@names) = qw(getattr readlink getdir mknod mkdir unlink rmdir symlink rename link chmod chown truncate utime open read write); + my (@subs) = (0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0); + my (@names) = qw(getattr readlink getdir mknod mkdir unlink rmdir symlink rename link chmod chown truncate utime open read write statfs); my ($tmp) = 0; my (%mapping) = map { $_ => $tmp++ } (@names); my (%otherargs) = (debug=>0, threaded=>1, mountpoint=>""); @@ -121,6 +121,14 @@ Every constant you need (file types, open() flags, error values, etc) can be imported either from POSIX or from Fcntl, often both. See their respective documentations, for more information. +=head2 EXPORT + +None by default. + +=head2 EXPORTABLE CONSTANTS + +None. + =head2 FUNCTIONS YOUR FILESYSTEM MAY IMPLEMENT =head3 getattr @@ -278,13 +286,20 @@ Returns an errno. Called in an attempt to write (or overwrite) a portion of the file. Be prepared because $buffer could contain random binary data with NULLs and all sorts of other wonderful stuff. -=head2 EXPORT +=head3 statfs -None by default. +Arguments: none +Returns any of the following: -=head2 Exportable constants +-ENOANO() -None. +or + +$namelen, $files, $files_free, $blocks, $blocks_avail, $blocksize + +or + +-ENOANO(), $namelen, $files, $files_free, $blocks, $blocks_avail, $blocksize =head1 AUTHOR |