17 |
} |
} |
18 |
} |
} |
19 |
} |
} |
20 |
# define FUSE_CONTEXT_PRE create_perl_context(); { |
# define FUSE_CONTEXT_PRE create_perl_context(); { dSP |
21 |
# define FUSE_CONTEXT_POST } |
# define FUSE_CONTEXT_POST } |
22 |
# define FUSE_USE_ITHREADS |
# define FUSE_USE_ITHREADS |
23 |
# else |
# else |
24 |
# error "Sorry, I don't know how to handle ithreads on this architecture." |
# error "Sorry, I don't know how to handle ithreads on this architecture." |
25 |
# endif |
# endif |
26 |
#else |
#else |
27 |
# define FUSE_CONTEXT_PRE |
# define FUSE_CONTEXT_PRE dSP |
28 |
# define FUSE_CONTEXT_POST |
# define FUSE_CONTEXT_POST |
29 |
#endif |
#endif |
30 |
#include <fuse.h> |
#include <fuse.h> |
42 |
int _PLfuse_getattr(const char *file, struct stat *result) { |
int _PLfuse_getattr(const char *file, struct stat *result) { |
43 |
int rv; |
int rv; |
44 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
45 |
DEBUGf("getattr begin: %s\n",file); |
DEBUGf("getattr begin: %s\n",file); |
46 |
ENTER; |
ENTER; |
47 |
SAVETMPS; |
SAVETMPS; |
64 |
result->st_ctime = POPi; |
result->st_ctime = POPi; |
65 |
result->st_mtime = POPi; |
result->st_mtime = POPi; |
66 |
result->st_atime = POPi; |
result->st_atime = POPi; |
67 |
result->st_size = POPi; |
result->st_size = (size_t)POPi; |
68 |
result->st_rdev = POPi; |
result->st_rdev = POPi; |
69 |
result->st_gid = POPi; |
result->st_gid = POPi; |
70 |
result->st_uid = POPi; |
result->st_uid = POPi; |
85 |
int _PLfuse_readlink(const char *file,char *buf,size_t buflen) { |
int _PLfuse_readlink(const char *file,char *buf,size_t buflen) { |
86 |
int rv; |
int rv; |
87 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
88 |
if(buflen < 1) |
if(buflen < 1) |
89 |
return EINVAL; |
return EINVAL; |
90 |
DEBUGf("readlink begin\n"); |
DEBUGf("readlink begin\n"); |
125 |
int _PLfuse_getdir(const char *file, fuse_dirh_t dirh, fuse_dirfil_t dirfil) { |
int _PLfuse_getdir(const char *file, fuse_dirh_t dirh, fuse_dirfil_t dirfil) { |
126 |
int prv, rv; |
int prv, rv; |
127 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
128 |
DEBUGf("getdir begin\n"); |
DEBUGf("getdir begin\n"); |
129 |
ENTER; |
ENTER; |
130 |
SAVETMPS; |
SAVETMPS; |
152 |
int _PLfuse_mknod (const char *file, mode_t mode, dev_t dev) { |
int _PLfuse_mknod (const char *file, mode_t mode, dev_t dev) { |
153 |
int rv; |
int rv; |
154 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
155 |
DEBUGf("mknod begin\n"); |
DEBUGf("mknod begin\n"); |
156 |
ENTER; |
ENTER; |
157 |
SAVETMPS; |
SAVETMPS; |
177 |
int _PLfuse_mkdir (const char *file, mode_t mode) { |
int _PLfuse_mkdir (const char *file, mode_t mode) { |
178 |
int rv; |
int rv; |
179 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
180 |
DEBUGf("mkdir begin\n"); |
DEBUGf("mkdir begin\n"); |
181 |
ENTER; |
ENTER; |
182 |
SAVETMPS; |
SAVETMPS; |
202 |
int _PLfuse_unlink (const char *file) { |
int _PLfuse_unlink (const char *file) { |
203 |
int rv; |
int rv; |
204 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
205 |
DEBUGf("unlink begin\n"); |
DEBUGf("unlink begin\n"); |
206 |
ENTER; |
ENTER; |
207 |
SAVETMPS; |
SAVETMPS; |
225 |
int _PLfuse_rmdir (const char *file) { |
int _PLfuse_rmdir (const char *file) { |
226 |
int rv; |
int rv; |
227 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
228 |
DEBUGf("rmdir begin\n"); |
DEBUGf("rmdir begin\n"); |
229 |
ENTER; |
ENTER; |
230 |
SAVETMPS; |
SAVETMPS; |
248 |
int _PLfuse_symlink (const char *file, const char *new) { |
int _PLfuse_symlink (const char *file, const char *new) { |
249 |
int rv; |
int rv; |
250 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
251 |
DEBUGf("symlink begin\n"); |
DEBUGf("symlink begin\n"); |
252 |
ENTER; |
ENTER; |
253 |
SAVETMPS; |
SAVETMPS; |
272 |
int _PLfuse_rename (const char *file, const char *new) { |
int _PLfuse_rename (const char *file, const char *new) { |
273 |
int rv; |
int rv; |
274 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
275 |
DEBUGf("rename begin\n"); |
DEBUGf("rename begin\n"); |
276 |
ENTER; |
ENTER; |
277 |
SAVETMPS; |
SAVETMPS; |
296 |
int _PLfuse_link (const char *file, const char *new) { |
int _PLfuse_link (const char *file, const char *new) { |
297 |
int rv; |
int rv; |
298 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
299 |
DEBUGf("link begin\n"); |
DEBUGf("link begin\n"); |
300 |
ENTER; |
ENTER; |
301 |
SAVETMPS; |
SAVETMPS; |
320 |
int _PLfuse_chmod (const char *file, mode_t mode) { |
int _PLfuse_chmod (const char *file, mode_t mode) { |
321 |
int rv; |
int rv; |
322 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
323 |
DEBUGf("chmod begin\n"); |
DEBUGf("chmod begin\n"); |
324 |
ENTER; |
ENTER; |
325 |
SAVETMPS; |
SAVETMPS; |
344 |
int _PLfuse_chown (const char *file, uid_t uid, gid_t gid) { |
int _PLfuse_chown (const char *file, uid_t uid, gid_t gid) { |
345 |
int rv; |
int rv; |
346 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
347 |
DEBUGf("chown begin\n"); |
DEBUGf("chown begin\n"); |
348 |
ENTER; |
ENTER; |
349 |
SAVETMPS; |
SAVETMPS; |
369 |
int _PLfuse_truncate (const char *file, off_t off) { |
int _PLfuse_truncate (const char *file, off_t off) { |
370 |
int rv; |
int rv; |
371 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
372 |
DEBUGf("truncate begin\n"); |
DEBUGf("truncate begin\n"); |
373 |
ENTER; |
ENTER; |
374 |
SAVETMPS; |
SAVETMPS; |
393 |
int _PLfuse_utime (const char *file, struct utimbuf *uti) { |
int _PLfuse_utime (const char *file, struct utimbuf *uti) { |
394 |
int rv; |
int rv; |
395 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
396 |
DEBUGf("utime begin\n"); |
DEBUGf("utime begin\n"); |
397 |
ENTER; |
ENTER; |
398 |
SAVETMPS; |
SAVETMPS; |
419 |
int rv; |
int rv; |
420 |
int flags = fi->flags; |
int flags = fi->flags; |
421 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
422 |
DEBUGf("open begin\n"); |
DEBUGf("open begin\n"); |
423 |
ENTER; |
ENTER; |
424 |
SAVETMPS; |
SAVETMPS; |
443 |
int _PLfuse_read (const char *file, char *buf, size_t buflen, off_t off, struct fuse_file_info *fi) { |
int _PLfuse_read (const char *file, char *buf, size_t buflen, off_t off, struct fuse_file_info *fi) { |
444 |
int rv; |
int rv; |
445 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
446 |
DEBUGf("read begin\n"); |
DEBUGf("read begin\n"); |
447 |
ENTER; |
ENTER; |
448 |
SAVETMPS; |
SAVETMPS; |
482 |
int _PLfuse_write (const char *file, const char *buf, size_t buflen, off_t off, struct fuse_file_info *fi) { |
int _PLfuse_write (const char *file, const char *buf, size_t buflen, off_t off, struct fuse_file_info *fi) { |
483 |
int rv; |
int rv; |
484 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
485 |
DEBUGf("write begin\n"); |
DEBUGf("write begin\n"); |
486 |
ENTER; |
ENTER; |
487 |
SAVETMPS; |
SAVETMPS; |
507 |
int _PLfuse_statfs (const char *file, struct statvfs *st) { |
int _PLfuse_statfs (const char *file, struct statvfs *st) { |
508 |
int rv; |
int rv; |
509 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
510 |
DEBUGf("statfs begin\n"); |
DEBUGf("statfs begin\n"); |
511 |
ENTER; |
ENTER; |
512 |
SAVETMPS; |
SAVETMPS; |
552 |
int _PLfuse_flush (const char *file, struct fuse_file_info *fi) { |
int _PLfuse_flush (const char *file, struct fuse_file_info *fi) { |
553 |
int rv; |
int rv; |
554 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
555 |
DEBUGf("flush begin\n"); |
DEBUGf("flush begin\n"); |
556 |
ENTER; |
ENTER; |
557 |
SAVETMPS; |
SAVETMPS; |
576 |
int rv; |
int rv; |
577 |
int flags = fi->flags; |
int flags = fi->flags; |
578 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
579 |
DEBUGf("release begin\n"); |
DEBUGf("release begin\n"); |
580 |
ENTER; |
ENTER; |
581 |
SAVETMPS; |
SAVETMPS; |
601 |
int rv; |
int rv; |
602 |
int flags = fi->flags; |
int flags = fi->flags; |
603 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
604 |
DEBUGf("fsync begin\n"); |
DEBUGf("fsync begin\n"); |
605 |
ENTER; |
ENTER; |
606 |
SAVETMPS; |
SAVETMPS; |
625 |
int _PLfuse_setxattr (const char *file, const char *name, const char *buf, size_t buflen, int flags) { |
int _PLfuse_setxattr (const char *file, const char *name, const char *buf, size_t buflen, int flags) { |
626 |
int rv; |
int rv; |
627 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
628 |
DEBUGf("setxattr begin\n"); |
DEBUGf("setxattr begin\n"); |
629 |
ENTER; |
ENTER; |
630 |
SAVETMPS; |
SAVETMPS; |
651 |
int _PLfuse_getxattr (const char *file, const char *name, char *buf, size_t buflen) { |
int _PLfuse_getxattr (const char *file, const char *name, char *buf, size_t buflen) { |
652 |
int rv; |
int rv; |
653 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
654 |
DEBUGf("getxattr begin\n"); |
DEBUGf("getxattr begin\n"); |
655 |
ENTER; |
ENTER; |
656 |
SAVETMPS; |
SAVETMPS; |
694 |
int _PLfuse_listxattr (const char *file, char *list, size_t size) { |
int _PLfuse_listxattr (const char *file, char *list, size_t size) { |
695 |
int prv, rv; |
int prv, rv; |
696 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
697 |
DEBUGf("listxattr begin\n"); |
DEBUGf("listxattr begin\n"); |
698 |
ENTER; |
ENTER; |
699 |
SAVETMPS; |
SAVETMPS; |
758 |
int _PLfuse_removexattr (const char *file, const char *name) { |
int _PLfuse_removexattr (const char *file, const char *name) { |
759 |
int rv; |
int rv; |
760 |
FUSE_CONTEXT_PRE; |
FUSE_CONTEXT_PRE; |
|
dSP; |
|
761 |
DEBUGf("removexattr begin\n"); |
DEBUGf("removexattr begin\n"); |
762 |
ENTER; |
ENTER; |
763 |
SAVETMPS; |
SAVETMPS; |
813 |
MODULE = Fuse PACKAGE = Fuse |
MODULE = Fuse PACKAGE = Fuse |
814 |
PROTOTYPES: DISABLE |
PROTOTYPES: DISABLE |
815 |
|
|
816 |
|
SV* |
817 |
|
fuse_get_context() |
818 |
|
PREINIT: |
819 |
|
struct fuse_context *fc; |
820 |
|
CODE: |
821 |
|
fc = fuse_get_context(); |
822 |
|
if(fc) { |
823 |
|
HV *hash = newHV(); |
824 |
|
hv_store(hash, "uid", 3, newSViv(fc->uid), 0); |
825 |
|
hv_store(hash, "gid", 3, newSViv(fc->gid), 0); |
826 |
|
hv_store(hash, "pid", 3, newSViv(fc->pid), 0); |
827 |
|
RETVAL = newRV_noinc((SV*)hash); |
828 |
|
} else { |
829 |
|
XSRETURN_UNDEF; |
830 |
|
} |
831 |
|
OUTPUT: |
832 |
|
RETVAL |
833 |
|
|
834 |
void |
void |
835 |
perl_fuse_main(...) |
perl_fuse_main(...) |
836 |
PREINIT: |
PREINIT: |
852 |
threaded = SvIV(ST(1)); |
threaded = SvIV(ST(1)); |
853 |
if(threaded) { |
if(threaded) { |
854 |
#ifdef FUSE_USE_ITHREADS |
#ifdef FUSE_USE_ITHREADS |
855 |
master_interp = PERL_GET_INTERP; |
master_interp = PERL_GET_CONTEXT; |
856 |
#else |
#else |
857 |
fprintf(stderr,"FUSE warning: Your script has requested multithreaded " |
fprintf(stderr,"FUSE warning: Your script has requested multithreaded " |
858 |
"mode, but your perl was not built with -Dusethreads. " |
"mode, but your perl was not built with -Dusethreads. " |
909 |
} |
} |
910 |
|
|
911 |
if(threaded) { |
if(threaded) { |
912 |
fuse_loop_mt(fuse_new(fd,&fargs,&fops,sizeof(fops)/sizeof(void*))); |
fuse_loop_mt(fuse_new(fd,&fargs,&fops,sizeof(fops))); |
913 |
} else |
} else |
914 |
fuse_loop(fuse_new(fd,&fargs,&fops,sizeof(fops)/sizeof(void*))); |
fuse_loop(fuse_new(fd,&fargs,&fops,sizeof(fops))); |
915 |
fuse_opt_free_args(&fargs); |
fuse_opt_free_args(&fargs); |