U/perl/d_statfs_f_flags.U

   1 ?RCS: $Id$
   2 ?RCS:
   3 ?RCS: Copyright (c) 1999 Jarkko Hietaniemi
   4 ?RCS:
   5 ?RCS: You may distribute under the terms of either the GNU General Public
   6 ?RCS: License or the Artistic License, as specified in the README file.
   7 ?RCS:
   8 ?MAKE:d_statfs_f_flags: \
   9         Hasfield i_sysparam i_sysmount i_systypes \
  10         i_sysvfs i_sysstatfs Setvar d_statfs_s
  11 ?MAKE:  -pick add $@ %<
  12 ?S:d_statfs_f_flags:
  13 ?S:     This variable conditionally defines the HAS_STRUCT_STATFS_F_FLAGS
  14 ?S:     symbol, which indicates to struct statfs from has f_flags member.
  15 ?S:     This kind of struct statfs is coming from sys/mount.h (BSD),
  16 ?S:     not from sys/statfs.h (SYSV).
  17 ?S:.
  18 ?C:HAS_STRUCT_STATFS_F_FLAGS:
  19 ?C:     This symbol, if defined, indicates that the struct statfs
  20 ?C:     does have the f_flags member containing the mount flags of
  21 ?C:     the filesystem containing the file.
  22 ?C:     This kind of struct statfs is coming from <sys/mount.h> (BSD 4.3),
  23 ?C:     not from <sys/statfs.h> (SYSV).  Older BSDs (like Ultrix) do not
  24 ?C:     have statfs() and struct statfs, they have ustat() and getmnt()
  25 ?C:     with struct ustat and struct fs_data.
  26 ?C:.
  27 ?H:#$d_statfs_f_flags HAS_STRUCT_STATFS_F_FLAGS         /**/
  28 ?H:.
  29 ?LINT:set d_statfs_f_flags
  30 : see if struct statfs knows about f_flags
  31 case "$d_statfs_s" in
  32 define)
  33         echo " "
  34         echo "Checking to see if your struct statfs has f_flags field..." >&4
  35         set d_statfs_f_flags statfs f_flags $i_systypes sys/types.h $i_sysparam sys/param.h $i_sysmount sys/mount.h $i_sysvfs sys/vfs.h $i_sysstatfs sys/statfs.h
  36         eval $hasfield
  37         ;;
  38 *)      val="$undef"
  39         set d_statfs_f_flags
  40         eval $setvar
  41         ;;
  42 esac
  43 case "$d_statfs_f_flags" in
  44 "$define")      echo "Yes, it does."   ;;
  45 *)              echo "No, it doesn't." ;;
  46 esac
  47