--- perl-llin/Fuse.pm 2006/11/29 13:27:59 106 +++ perl-llin/Fuse.pm 2008/03/19 19:40:20 123 @@ -21,14 +21,14 @@ # If you do not need this, moving things directly into @EXPORT or @EXPORT_OK # will save memory. our %EXPORT_TAGS = ( - 'all' => [ qw(XATTR_CREATE XATTR_REPLACE) ], + 'all' => [ qw(XATTR_CREATE XATTR_REPLACE fuse_get_context) ], 'xattr' => [ qw(XATTR_CREATE XATTR_REPLACE) ] ); our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } ); our @EXPORT = (); -our $VERSION = '0.08'; +our $VERSION = '0.09_3'; sub AUTOLOAD { # This AUTOLOAD is used to 'autoload' constants from the constant() @@ -234,6 +234,15 @@ =back +=head3 Fuse::fuse_get_context + + use Fuse "fuse_get_context"; + my $caller_uid = fuse_get_context()->{"uid"}; + my $caller_gid = fuse_get_context()->{"gid"}; + my $caller_pid = fuse_get_context()->{"pid"}; + +Access context information about the current Fuse operation. + =head2 FUNCTIONS YOUR FILESYSTEM MAY IMPLEMENT =head3 getattr