basis/unix/statvfs/macosx/macosx.factor

   1 ! Copyright (C) 2008 Doug Coleman.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: alien.syntax ;
   4 IN: unix.statvfs.macosx
   5
   6 C-STRUCT: statvfs
   7     { "ulong"   "f_bsize" }
   8     { "ulong"   "f_frsize" }
   9     { "fsblkcnt_t"  "f_blocks" }
  10     { "fsblkcnt_t"  "f_bfree" }
  11     { "fsblkcnt_t"  "f_bavail" }
  12     { "fsfilcnt_t"  "f_files" }
  13     { "fsfilcnt_t"  "f_ffree" }
  14     { "fsfilcnt_t"  "f_favail" }
  15     { "ulong"   "f_fsid" }
  16     { "ulong"   "f_flag" }
  17     { "ulong"   "f_namemax" } ;
  18
  19 ! Flags
  20 CONSTANT: ST_RDONLY   HEX: 1 ! Read-only file system
  21 CONSTANT: ST_NOSUID   HEX: 2 ! Does not honor setuid/setgid
  22
  23 FUNCTION: int statvfs ( char* path, statvfs* buf ) ;