/[fuse.before_github]/perl/trunk/examples/loopback.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /perl/trunk/examples/loopback.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 4 by mszeredi, Thu Nov 11 14:44:15 2004 UTC revision 10 by dpavlin, Sun Mar 20 00:36:05 2005 UTC
# Line 7  use POSIX qw(ENOENT ENOSYS EEXIST EPERM Line 7  use POSIX qw(ENOENT ENOSYS EEXIST EPERM
7  use Fcntl qw(S_ISBLK S_ISCHR S_ISFIFO SEEK_SET);  use Fcntl qw(S_ISBLK S_ISCHR S_ISFIFO SEEK_SET);
8  require 'syscall.ph'; # for SYS_mknod and SYS_lchown  require 'syscall.ph'; # for SYS_mknod and SYS_lchown
9    
10  sub fixup { return "/tmp/fusetest" . shift }  sub fixup { return "/tmp/fusetest-" . $ENV{LOGNAME} . shift }
11    
12  sub x_getattr {  sub x_getattr {
13          my ($file) = fixup(shift);          my ($file) = fixup(shift);
Legend:
Removed from v.4  
changed lines
  Added in v.10
  ViewVC Help
Powered by ViewVC 1.1.26