git-svn-id: svn+ssh://llin/home/dpavlin/private/svn/fuse/perl-llin@26
6e4b0b00-1209-0410-87b2-
b275959b5705
our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
our @EXPORT = ();
-our $VERSION = '0.07_1';
+our $VERSION = '0.07_2';
sub AUTOLOAD {
# This AUTOLOAD is used to 'autoload' constants from the constant()
return rv;
}
-int _PLfuse_statfs (const char *file, struct statfs *st) {
+/* FIXME check for old fuse API (< 21?) and use statfs here */
+int _PLfuse_statfs (const char *file, struct statvfs *st) {
int rv;
char *rvstr;
FUSE_CONTEXT_PRE;
SPAGAIN;
if(rv > 5) {
st->f_bsize = POPi;
- st->f_bfree = POPi;
+ st->f_bfree = st->f_bavail = POPi;
st->f_blocks = POPi;
- st->f_ffree = POPi;
+ st->f_ffree = st->f_favail = POPi;
st->f_files = POPi;
- st->f_namelen = POPi;
+ st->f_namemax = POPi;
+ /* zero all other */
+ st->f_frsize = 4096;
+ st->f_fsid = 0;
+ st->f_flag = 0;
+
if(rv > 6)
rv = POPi;
else
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
name: Fuse
-version: 0.07_1
+version: 0.07_2
version_from: Fuse.pm
installdirs: site
requires: